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Woord vooraf 


Rechtvaardigheid! Eerlijkheidshalve moet ik zeggen dat dit boek een behoorlijke 
‘selfkick’ is geworden. Wat mij persoonlijk aan het werken met MSX-computers 
stoorde, is het gebrek aan ‘ter zake doende’ informatie en het ontbreken van goed 
werkende ontwikkelingsprogrammatuur. Zelf programmeer ik ALLEEN 
MAAR in machinetaal en dat op onder andere MSX, Commodore 64/128/ 
Cl6/ + 4, Atari ST en AMIGA. Voor de niet-MSX-machines is het allemaal wel 
in orde: voldoende informatie en goede programmeermogelijkheden. Met de 
MSX is het tot mijn spijt wat minder mooi gesteld! 


De informatie ontbreekt veelal of blinkt uit in nutteloze zwaarlijvigheid en wat de 
ontwikkelingsprogrammatuur betreft, is het ‘huilen met de pet af’! Over die 
informatie volsta ik met op te merken dat deze vaak uit de fabrieksopgave(n) is 
overgenomen. Daarom is het soms onmogelijk om snel iets terug te vinden. De 
ontwikkelingsprogrammatuur draait meestal onder MSX-DOS waardoor het 
weer moeilijk wordt om de BIOS-routines aan te spreken. Ook in alle andere 
gevallen (misschien een kleine uitzondering voor ZEN) wordt er veel te slordig 
omgesprongen met het toch al veel te kleine werkgeheugen van de MSX. 


Ik heb bovenal getracht een ‘anders dan anders’ boek te schrijven. De informatie 
is snel en sluit aan op het eigenlijke programmeren in machinetaal. Geen uitge- 
breide omschrijvingen dus, maar handige tabellen. 

Als programmeeromgeving heb ik speciaal voor dit boek een Z80-monitor ge- 
schreven. Het voordeel van zo’n machinetaalmonitor is de directe aanpak! De 
code wordt ter plekke aangemaakt waardoor het geheugen uiterst efficiënt kan 
worden gebruikt. Daarnaast vindt U nog een 25-tal extra mogelijkheden als 
disassemblering, geheugen-dumps, tekstinvoer, stelselconversie, logische bewer- 
kingen enz. 


Verder krijgt U een aantal treffende MSX-routines die U natuurlijk in uw eigen 
programma's kunt toepassen. Daarnaast nog een behoorlijk aanzetje tot een 
karakter-editor en een sprite-editor. 


Kortom, efficiency voor alles. De dosis informatie is vrij stevig, maar de (uw) 
resultaten zijn dan ook navenant. Dat garandeer ik U! 


John ‘Dry’ Vanderaart 
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Inleiding 


Welkom nogmaals in dit ‘doe’-boek, waarde MSX-bezitter! 

U heeft dit boek waarschijnlijk ter hand genomen omdat U benieuwd bent naar al 
die verborgen MSX-capaciteiten. Een MSX-computer kan echt verschrikkelijk 
veel, maar niet in BASIC. Tenminste niet SNEL. BASIC, en dan met name het 
MSX-BASIC, is erg flexibel maar daarmee verliest het meteen een fors stuk 
snelheid. Toegegeven, in BASIC is ook alles mogelijk, maar dan wél op een laag 
pitje. Probeert U maar eens 32 sprites te laten bewegen, teksten af te drukken, 
geluid te produceren, een proces te controleren, en dat alles het liefst ook nog eens 
tegelijk! De enige oplossing is machinetaal. 


Machinetaal. Het klinkt vrij simpel, maar pas op! En zeker op een MSX-com- 
puter. Het eerste probleem wordt de ‘syntax’, want machinetaal is op het eerste 
gezicht niet te begrijpen. Dat klopt ook wel, aangezien de instructies in het begin 
wel erg op elkaar lijken. Het is een kwestie van gewenning en ervaring, dus zult U 
even door een zure appel heen moeten! 

Het tweede probleem is de programmadefinitie. In een hogere programmeertaal 
wordt overal voor gezorgd. Iets afdrukken stelt helemaal niets voor, laat staan de 
rekenkundige bewerkingen of de foutafhandeling. Het bijhouden van het variabe- 
lengeheugen ziet U bijvoorbeeld al helemaal niet! In machinetaal daarentegen 
moet U alles met de hand doen. Vaak wordt dat heel omslachtig, maar het 
voordeel is een stukje razendsnelle precisie. 

Een derde probleem is de kennis over de computer. Laten we uit uw aanschaf van 
dit boek concluderen dat U BASIC bent ontgroeid. De video-chip kent U 
natuurlijk al en ook de geluids-chip is inmiddels een open boek. Het is dan ook 
belachelijk om al die kennis nog eens voor te kauwen. In plaats daarvan vindt u 
een aantal tabellen met alle informatie die een machinetaal-programmeur zich 
maar kan wensen. 

Vierde en laatste probleem is het invoeren van de gewenste machinecode. Geen 
probleem aangezien U achterin dit boek een speciaal ontwikkelde machinetaal- 
monitor zult vinden. Het is even een aardig intypklusje, maar daartegenover staat 
een stuk ontwikkelings-software dat de prijs van dit boek meer dan rechtvaardigt! 
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Bijkomend voordeel: U kunt alle listings uit dit boek meteen testen op hun 
deugdelijkheid. 


Wat gaan we doen? We gaan aan het werk! Zoals gezegd is dit een DOE-boek en 
het is niet de bedoeling dat U zich er met een ‘eitje’ vanaf kunt maken. Het wordt 
zweten, maar daarna weet U dan ook precies hoe U volledig zelfstandig draaiende 
machinetaal-programma’s kunt schrijven. Er wordt niets teveel beloofd, want U 
gaat zien hoe U(!) de video-chip nu ECHT kunt manipuleren, U zult leren hoe 
bestanden via de cassetterecorder worden geladen en opgeslagen. Ook gaat U 
werken met de printer, niet te vergeten de sprite-routines, wat spelmogelijkheden, 
tevens nog wat speciale effecten. Precies datgene wat nodig 1s voor een aantrek- 
kelijk en supersnel programma! 


De frustratiedrempel 


Voordat we gaan beginnen, moeten we iets afspreken: U klimt niet in de lamp! 
Wat hiermee wordt bedoeld? 

Programmeren in machinetaal is iets dat een grote dosis zelfbeheersing vereist. De 
kleinste beredeneringsfout en de MSX slaat op “TILT®, met de hoofdletter T dus. 
Waar U in BASIC nog altijd een CTRL/STOP-combinatie heeft, kunt U het in 
machinetaal wel vergeten. In 99 van de 100 gevallen is de RESET-knop de enige 
uitweg en kunt U weer opnieuw beginnen. Maar ja, dan had U tenslotte maar niet 
aan machinetaal moeten beginnen! 


Tegenover de voortdurende frustratie staat een zinderende kick als uw routines 
WEL werken. U (en ook uw omgeving!) zult werkelijk onder de indruk raken van 
de fabelachtige snelheid waarmee machinetaal de zaken regelt. Waar U in BASIC 
de zoveelste bak koffie wegslurpt, komt U om van de machinetaaldorst.… 


En in geen geval gaat de MSX het raam uit, want dat hebben we daarnet al 
afgesproken! 
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1 Z80 Machinetaal 


1.1 Werken met een microprocessor 


In iedere computer bevindt zich een microprocessor. Een microprocessor is in 
feite het ‘kloppende hart’ van de computer. Via deze processor worden alle 
zichtbare en onzichtbare computerfuncties aangestuurd, zoals het toetsenbord, 
het beeldscherm, het interne geheugen enz. In uw MSX-computer zit een Z80, een 
zeer krachtige en werkelijk razendsnelle 8-bits microprocessor. 

Zo’n Z80-processor dient op een zeer speciale manier te worden aangesproken, in 
een speciaal taaltje: het bijna onbegrijpelijke ‘machinetaal’. Wat is machinetaal nu 
precies? 

Machinetaal is een op de microprocessor gerichte en daarom bovenal logisch 
opgebouwde, zeer directe programmeertaal. De niet al te veeleisende gebruiker 
merkt al gauw dat machinetaal in feite maar tot vier dingen in staat is: 


l simpele berekeningen (optellen, aftrekken, vergelijken) 

2 dataverplaatsing (in elke mogelijke vorm) 

3 logische bewerkingen of operaties (bijvoorbeeld ‘AND’, ‘OR’ en XOR) 
4 tests en sprongen 


Ondanks (misschien dankzij?) al deze schijnbare beperkingen is machinecode 
snel, zeer snel. De BASIC-interpreter bijvoorbeeld is in feite niets anders dan een 
programma dat geheel in machinetaal is geschreven. Deze BASIC-interpreter is 
tevens een voorbeeld van een programma dat in ROM (Read Only Memory — 
permanent beschreven geheugen, waaruit alleen kan worden gelezen) staat. Het 
voordeel van zo’n ROM-programma is de permanente aanwezigheid. Een nadeel 
is de onmogelijkheid om er veranderingen in aan te brengen. 

Naast ROM-geheugen bestaat er ook RAM-geheugen (Random Access Memory 
— geheugen waar zowel uit gelezen als in geschreven kan worden) dat als enige 
nadeel heeft dat het wordt gewist zodra de computer wordt uitgeschakeld. Pro- 
gramma’s die u schrijft en probeert, worden in eerste instantie in RAM-geheugen 
geschreven. Pas in een later stadium kunt u besluiten deze programma’s in een 
EPROM te ‘bakken’. Een EPROM is een iets minder permanent broertje van een 
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echte ROM-chip; de inhoud blijft bewaard als de stroom wordt uitgeschakeld, 
maar is door middel van ultraviolet licht te wissen. 


Om even op die fabelachtige snelheid terug te komen: machinetaal (mits goed 
geschreven) kan vele honderden malen sneller zijn dan welk BASIC-programma 
dan ook. Waar het BASIC altijd eerst dient te worden vertaald, is machinetaal 
meteen al verwerkingsklaar. 

Een nadeel van machinetaal is de geringere flexibiliteit en de noodzakelijke 
scherpere definitie. Een machinetaalprogramma is namelijk veel minder flexibel 
dan een programma dat is geschreven in een hogere programmeertaal (BASIC, 
PASCAL, C.. .) omdat het veel directer moet zijn geschreven. Denk bijvoorbeeld 
maar eens aan een simpele uitvoerroutine. In BASIC volstaat een PRINT- 
opdracht, die ook nog eens eenvoudig is te wijzigen. In machinetaal moet u al 
gauw een tiental instructies aanspreken en dan maakt u daarbij ook nog eens 
gebruik van systeem-ROM-routines. Om over het wijzigen nog maar niet te 
spreken! 

Ook moet de definitie van een machinetaalprogramma vrij volledig zijn. In negen 
van de tien gevallen blijkt een zelfgeschreven routine niet te werken omdat u 
ergens iets vergeten bent! Een gedegen systeemkennis is dan ook een eerste 
vereiste. Sterker nog: u zult moeten weten hoe een MSX-computer in elkaar 
steekt, voordat het verantwoord is om ook maar een byte in machinecode te 
testen! 


Gedegen systeemkennis dus. Waar hogere programmeertalen meestal vrij over- 
draagbaar zijn (een “10 PRINT”Hallo!”’ / 20 GOTO 10’-grapje in BASIC werkt 
immers altijd) is machinetaal uiterst persoonlijk. 

Zelfs al beschikken verschillende computers over dezelfde microprocessor, dan 
nog heeft u meestal met een totaal ander systeem te maken. Andere systeemrout1- 
nes, andere grafische mogelijkheden, andere randapparatuur enz... De machine- 
taalprogrammeur dient hier alles over te weten voordat hij ook maar één zinvolle 
byte programmeert! 


1.2 Het invoeren van machinecode 


Bij het invoeren van machinetaalprogramma’s is de programmeeromgeving een 
probleem op zich. In BASIC kunt u alles klakkeloos intypen; het gaat goed totdat 
de computer met een ‘OUT OF MEMORY ERROR’ of iets van dien aard komt 
aanzetten. In machinetaal weet u eigenlijk nooit precies wanneer het is afgelopen 
met de vrije ruimte, want dat bepaalt u zelf! Toegegeven dat er een onder- en 
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bovengrens aan de vrije geheugenruimte zit, maar dan nóg blijven er altijd slimme 
zijwegen over. 


Maar hoe komt de zelfgeschreven machinecode dan in het geheugen terecht? U 
hoeft niet te proberen om in BASIC een machinecode-instructie te gebruiken. Hoe 
exact overgenomen ook, u komt altijd met een ‘SYNTAX ERROR’ te zitten. 
Slim als u bent, komt u op het idee om de machinecode met behulp van DATA- 
regels te “POK EN’. Een programma bestaat tenslotte uit allemaal getallen tussen 
Oen 255, zodat de juiste getallen in de juiste volgorde een werkend geheel moeten 
opleveren. U heeft volkomen gelijk, alleen is het een werkje waarmee zelfs de 
geduldtgste monnik zwaar “in de stress’ raakt! 


Om machinecode te verwerken, bestaan er dan ook speciale hulpprogramma’s. 
Twee soorten eigenlijk: assemblers en monitors. 

Een assembler is een veredelde tekst-editor waarmee u de machinecode ongeveer 
zoals teksten in een tekstverwerker kunt invoeren. Erg handig is het feit dat een 
assembler niet met exacte cijfers werkt maar met zogenaamde labels. Hierdoor 
kunt u het programma erg eenvoudig op een andere geheugenlocatie laten begin- 
nen. Het nadeel van een assembler is de grootte en de ‘lompheid’. Want echt snel 
en direct kunt u er meestal niet mee werken. 


Het snellere broertje van een assembler luistert naar de dubieuze naam “monitor”. 
Geen beeldbuis, maar wel iets om mee te ‘kijken’. Met een monitor kunt U direct 
in het geheugen van uw computer gluren. U kunt het geheugen als een tekst-dump 
aanschouwen, misschien in hexadecimale getallen, maar ook als een disassembly. 
Een disassembly-listing is precies het tegenovergestelde van een assemblerings- 
proces. Waar het laatste uw teksten omzet naar zinvolle getallen en dus te 
verwerken machinecode, is een disassembly een omzetting van schier onbegrijpe- 
lijke getallen naar redelijk leesbare machinecode. 

Naast dit is het vanzelfsprekend ook mogelijk om met een monitor direct code te 
assembleren. Dit laatste gaat regelsgewijs maar het grote voordeel is wel dat u 
precies ziet WAT en WAAR u schrijft. Verder voorziet een monitor meestal in 
vele handige foefjes om het u allemaal zo gemakkelijk mogelijk te maken. 

In dit boek staat de listing van een echte machtnetaalmonitor, de HERBYMON. 
Een speciaal geschreven produkt dat het mogelijk maakt alle voorbeelden die in 
dit boek staan meteen te proberen. 


Zoals gezegd een monitor... Een kwestie van even een paar slapeloze nachten in 
verband met het intypen, maar dan gaat er meteen een nieuwe wereld voor u open! 
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Het verwerken van de machinecode hoeft in het kader van dit boek dan ook 
helemaal geen problemen meer op te leveren. En natuurlijk kunt u de ingetypte 
monitor ook gebruiken om zelf programma’s te schrijven. 
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2 De Z80-microprocessor 


2.1 Inleiding 


Zoals u inmiddels al weet, zit er in uw MSX een Z80-microprocessor. Allemaal 
leuk en aardig, maar veel verder helpt ons dat nog niet! 

In diverse andere boeken over machinetaal krijgt u eerst een hele verhandeling 
over het werken met de diverse getallenstelsels, maar waarom zouden we niet eerst 
kijken wat zo’n Z80 allemaal in huis heeft en wat het ding allemaal kan! In 
hoofdstuk 5 kunnen we dan altijd nog met cijfertjes stoeien, of u kunt er terecht als 
iets in dit hoofdstuk u (nog) niet helemaal duidelijk 1s. 





nl: INCrement / DECrement 

m2: Indexcalculatie 

n3: Logische rekeneenheid 

nd: Koppeling databus (B bits) 

5: Koppeling adresbus (16 bits) 

m6: Koppeling controlebus 

2: Buiten de Z8G-microprocessor (geheugen en IO) 


OPC: Instructieregister / instructiedecoder / controle 
Afb. 2.1. Schematisch overzicht van de Z80 
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Een Z80-microprocessor beschikt over een aantal zaken: 


de program counter of programmateller (PC) 

de stack pointer of stapelwijzer (SP) 

de indexregisters: IX en IY 

het A-register of de accumulator 

zes algemene registers: B, C, D, E‚ Hen L (Ook als drie duo's aan te roepen: BC, 
DE en HL) 

het flag-register F (als registerpaar in AF) 

het interrupt-register I 

het refresh-register R 

een set ‘verborgen’ registers A' tot en met L’ 


De laatste drie zijn nogal gevaarlijk en worden in dit boek niet gebruikt, temeer 
daar ze vooral zijn bedoeld voor specifiek intern gebruik. Pas als u over zeer veel 
machinetaalervaring beschikt, is het zinnig om ermee te stoeien. 


2.2 De program counter of programmateller 


De program counter of programmateller, PC vanaf nu, is een register dat uit twee 
bytes bestaat. Twee bytes bevatten namelijk 16 afzonderlijke bits, waardoor het 
bereik meteen is bepaald tot “2 tot de macht 16-1’, ofte wel het gebied dat loopt van 
$0000 tot SFFFF, hetgeen in totaal 65536 verschillende geheugenadressen ople- 
vert. (Allemaal afzonderlijk adresseerbaar!) 

Zo’n PC (niet te verwarren met de afkorting van Personal Computer!) is in iedere 
microprocessor aanwezig en heeft binnen iedere microprocessor ook nog eens 
dezelfde functie: het bijhouden van de juiste programma-adressering. De PC valt 
enigszins te vergelijken met een BASIC-regelteller. 


Afhankelijk van de instructie die wordt verwerkt, wordt de waarde van de PC 
beïnvloed. Een ‘gewone’ instructie verhoogt de PC steeds met één, net genoeg om 
de volgende instructie te lezen, Andere instructies verhogen de PC soms wel met 
twee, drie of vier, afhankelijk van de hoeveelheid bytes die zij nodig hebben om 
aan de slag te kunnen. Ook zijn er speciale instructies, spronginstructies bijvoor- 
beeld, die de PC van een volstrekt nieuwe waarde voorzien. 


Hoe ‘werkt’ een programma dan? Een voor de hand liggende vraag. U moet zich 
voorstellen dat er een koppeling bestaat tussen aan de ene kant de 280-micro- 


processor en aan de andere kant het (meestal 64K) MSX-geheugen. De inhoud 
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van de PC wordt op een speciale 16-bits brede adreslijn gezet en naar het MSX- 
geheugen gestuurd, vervolgens wordt er een byte vanaf het zo geadresseerde 
PC-adres via een even speciale 8-bits brede datalijn naar de Z80-microprocessor 
gestuurd. .Enzovoort! Afhankelijk van de opgestuurde bytes verzorgt de Z80- 
processor de te volgen strategie en uw programma werkt — mits goed geprogram- 
meerd. 


2.3 De stack pointer of stapelwijzer 


De stack pointer, stapelwijzer of (vanaf nu) SP doet vermoeden dat er ook wel een 
‘stapel’ zal zijn! Vanzelfsprekend is dit het geval. 

Een stapel is een heel speciaal onderdeel van een microprocessor. Via deze stapel 
kan een aantal gegevens worden overgedragen. Het kan om gewone data gaan, 
maar ook adressen worden via de stapel doorgegeven. 


Het principe is uitermate simpel. Wat u als laatste op de stapel plaatst, komt er als 
eerste af. Denk maar eens aan de vuile vaat: het bovenste bord moet u eigenlijk als 
eerste afwassen. Zo niet dan komt alles naar beneden! 

Net als bij dit vergezochte voorbeeld kan er ook op stapelniveau van alles fout 
gaan. Als de stapel te hoog (letterlijk!) wordt, komt de boel naar beneden, hetgeen 
ook het geval is als u van onderen probeert weg te nemen. Heel goed oppassen dus! 
Het eigenlijke werken met zo’n stapel gaat door middel van twee speciale stapel- 
opdrachten. Als eerste is daar een speciale PUSH- of plaatsinstructie. Met zo’n 
instructie plaatst u iets bovenop de stapel. 

Behalve deze instructie bestaat er ook nog een POP- of pakinstructie, een instruc- 
tie waarmee u het laatst opgestapelde byte wegneemt. 


Ook de SP is een 16-bits register en kan het gehele geheugen adresseren. Een goede 
programmeur haalt evenveel van de stapel AF als hij er OP zet, waardoor een 
stapel eigenlijk nooit erg groot hoeft te worden. Als geheugengebied voor de 
stapel kiest u een slimme plaats die u toch niet gebruikt. (In BASIC voorziet het 
CLEAR-commando in een dergelijke mogelijkheid.) 


De stapel wordt voornamelijk gebruikt door de CALL-instructie. Een CALL is 
een subroutine in machinetaal. Wederom alles leuk en aardig maar als u een 
subroutine aanroept, wilt u dat na afloop het programma terugkeert op de juiste 
plaats: precies na die CALL-instructie. Hiertoe wordt de PC op de stapel ge- 
plaatst, vervolgens krijgt de PC het adres van de subroutine als waarde. Is de 
subroutine eenmaal uitgevoerd dan wordt de ‘oude’ waarde weer van de stapel 
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genomen en gaat het programma weer verder vanaf de juiste plaats. Nu begrijpt u 
meteen waarom u zeer voorzichtig moet zijn met deze stapel; als u er teveel opzet 
of afhaalt gaat er onherroepelijk ergens iets fout. 


2.4 De indexregisters: IX en TY 


Indexregisters voorzien in een speciale manier van adresseren. De inhoud van een 
indexregister wordt (uiteraard op voorwaarde dat er een index-adresseringsvorm 
is gebruikt) automatisch opgeteld bij een eveneens opgegeven basiswaarde. Hier- 
door kan de machinetaalprogrammeur vrij makkelijk een reeks van opeenvol- 
gende waarden bereiken. Denk hiervoor aan het werken met tabellen van dezelfde 
lengte. De indexregisters worden ook vaak gebruikt bij de behandeling van 
ARRAY-achtige structuren. 


In speciale gevallen kan het erg handig zijn om gebruik te maken van deze 
registers, maar dat moet iedere programmeur maar voor zichzelf uitmaken. U 
kunt ook heel goed zonder! 

We komen hierop nog terug in het volgende hoofdstuk, waarin we alle mogelijke 
vormen van adresseren bekijken. 


2.5 Het A-register of de accumulator 


De accumulator is verreweg het meest gebruikte register in 280-machinecodepro- 
gramma’s. Bijna alle belangrijke instructies doen iets met de inhoud van de 
accumulator. Vaak vindt een operatie plaats OP de waarde die zich op dat 
moment in de accumulator bevindt, waarna het resultaat weer IN deze accumula- 
tor wordt teruggezet. 

Er zijn zelfs diverse handige dataverplaatsinstructies die alleen maar met behulp 
van de accumulator hun werk kunnen doen. 


2.6 De zes algemene registers: B, C, D, E‚ H en L 


Deze registers werken ongeveer als de accumulator, alleen is het gebruik helaas 
veel beperkter. Een zeer groot voordeel is het feit dat deze registers in drie paren 
aan elkaar kunnen worden gekoppeld, waardoor 16-bits berekeningen mogelijk 
zijn. 

Ook kunt u de registerparen gebruiken voor adresseringsdoeleinden. Met name 
het HL-paar is dan erg handig! 


20 


Aan het B-register is trouwens ook nog een speciale ‘“DJNZ'-instructie gekoppeld. 
Meer hierover in een later stadium. 


2.7 Het flag-register F 


Minstens net zo belangrijk, zo niet belangrijker dan de accumulator is het flag- 
register. Dit register voorziet onder andere in speciale testmogelijkheden. 

In dit F-register bevinden zich namelijk zes onderdelen met ieder een aparte 
functie. Sommige zijn afzonderlijk te testen en worden binnen een programma 
gebruikt om te kijken of bepaalde condities optreden: nul, niet nul, groter dan, 
kleiner dan, enz. Andere zijn alleen behulpzaam binnen bepaalde berekeningsvor- 


men. 
| 


7 6 5 4 3 2 1 6 












Afb. 2.2. Het flag-register 


mk 


De carry ofte wel het C-bit. De carry wordt gebruikt als extra bit bij berekenin- 
gen en/of schuifoperaties. U kunt testen met “C’ voor een carry op 1, en met 
‘NC’ voor een carry op 0. 


2 De subtract flag of ook wel het N-bit. Dit bit wordt geset bij een aftrekking. Het 
is alleen van belang bij BCD-berekeningen. 


La 


De parity/overflow-flag, het P/V-bit. Bij rekenkundige bewerkingen wordt deze 
flag geset als er een overflow optreedt. Bij logische bewerkingen wordt dit bit 
geset als het resultaat een even aantal enen oplevert, anders wordt dit bit 0 
gemaakt. U test met ‘PO’ op een oneven pariteit en met ‘PE’ op een even 
pariteit. 


4 De half carry-flag of het H-bit. Dit bit is alteen van belang bij BCD-berekenin- 
gen. Het H-bit wordt geset als er van bit 3 naar bit 4 een carry optreedt van bit 3 
naar bit 4. 


5 De zero-flag of het Z-bit. Een heel belangrijke test-mogelijkheid aangezien dit 
Z-bit wordt geset als het resultaat van een bewerking nul oplevert. Er staat een 0 
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in het Z-bit als een resultaat ongelijk is aan nul. U kunt testen met ‘Z’ op een 
resultaat dat gelijk is aan nul, u test met ‘NZ’ op een resultaat dat ongelijk is aan 
nul. 


6 De sign-flag of het S-bit. Dit bit wordt 1 als het resultaat van een bewerking 
negatief isen 0 als dat resultaat positief is. U test met ‘P’ op een positieve waarde 


en met ‘M’ op een negatieve waarde. 


Nog even alle tests op een rijtje: 


test betekenis 

Z resultaat gelijk aan nul 
NZ resultaat ongelijk aan nul 
C carry 

NC geen carry 

PO oneven pariteit 

E even pariteit 

P positief resultaat 

M negatief resultaat 


2.8 Het interrupt-register I 


Dit register wordt exclusief gebruikt in interrupt mode 2 (IM 2) om een speciale 
vector-call te genereren. In het I-register wordt het high-byte voor de sprong 
bewaard, terwijl het apparaat dat de interrupt aanlevert voor het low-byte zorgt 
(hierover straks meer). 


2.9 Het refresh-register R 


Dit register wordt gebruikt voor een automatische refresh van het dynamische 
geheugen. U zult dit register waarschijnlijk nooit in zelfgeschreven programma's 
gebruiken. Voor de volledigheid misschien leuk om te weten dat het bestaat. 


2.10 De set ‘verborgen’ registers A’ tot en met L’ 


U kunt deze ‘extra’ set registers met bijvoorbeeld het EXX-commando ‘swappen’ 
(verwisselen) met de gewone registers. Dit kan in enkele gevallen handig zijn. 
Normaal gesproken is het beter om alleen met de gewone registerset te werken, in 
verband met verwarringsverschijnselen. 
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3 Adresseringstechnieken 


Laten we aannemen dat u nu begrijpt wat een Z80-microprocessor in huis heeft. 
Voordat we alle instructies gaan bespreken, is het misschien zinvol om eens te 
bekijken hoe u de diverse commando's kunt aanroepen, of hoe u ze gaat ‘adresse- 
ren’! 

Adresseren zullen we binnen dit kader verbasteren tot ‘aanroepen’. Want in de 
verschillende vormen van aanroepmogelijkheden ligt de kracht van het werken 
met machinetaal. 

Waar moet u aan denken? Een simpel voorbeeld: u wilt (gewoon in het dagelijks 
leven) informatie doorspelen. Het eenvoudigst en snelst gaat zoiets als u meteen 
spreekt met degene voor wie die informatie is bestemd. U kunt ook een brief 
posten, maar dan zit de PTT ertussen. Ook kunt ude telefoon gebruiken, of VAX, 
telex enz. Het hele systeem is erop gebaseerd dat de informatie op/aan het juiste 
adres komt. Dus: dezelfde informatie, verschillende doorgeefmethoden! 
Ongeveer zo werkt u met de diverse aanroepformaten in machinecode. En er zijn 
nogal wat van die verschillende Z80-mogelijkheden: 


impliciete adressering 
onmiddellijke adressering 
absolute adressering 

zero page adressering 
relatieve adressering 
geïndexeerde adressering 
indirecte adressering 
bitadressering 


Het is heel erg belangrijk dat u weet wat er allemaal mogelijk is binnen machine- 
taalprogrammering en dan met name bij het werken met de Z80-microprocessor. 
Slaat u het komende onderdeel dan ook zeker niet over. Het gebrek aan kennis 
kan u dan lelijk opbreken als u weer eens op zoek gaat naar het hoe en waarom van 
een instructie! 
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3.1 Impliciete adressering 


Bij ‘impliciete adressering’ gaat het vaak om bewerkingen die van toepassing zijn 
op één of twee specifieke registers. Het gaat om simpele instructies waarbij geen 
adres nodig is, omdat de instructie zichzelf al documenteert. 

Hierbij moet u denken aan korte instructies die meestal ook zeer snel zijn, 
bijvoorbeeld: INC B, RLA, SBC A, OR A, enz. 


Met de Z80-microprocessor in gedachten kunnen we eigenlijk nog wel wat 
instructies onder deze noemer meenemen. Hierbij gaat het om instructies die van 
toepassing zijn op onder andere ‘registerparen’. Bijvoorbeeld: EX AF,AF’, INC 
DE, DEC SP of LD A‚(HL). 


3.2 Onmiddellijke adressering 


In dit geval wordt de code die aangeeft om welke instructie het gaat, gevolgd door 
nog een enkel byte of in sommige gevallen zelfs door twee bytes (een word). Een 
byte voor een 8-bits getal, een word voor een 16-bits getal. 

Het gaat hier dus altijd om zeer directe gevallen zoals bijv. LD BC,$1234, LD 
B,500, SBC A,SFF of AND 511. 


3.3 Absolute adressering 


Er zijn altijd drie bytes nodig voor absolute adressering. Het eerste byte bevat de 
opcode en de twee volgende bytes geven het gewenste adres. Het eerste byte is het 
‘low-byte’ en levert een waarde tussen 0 en 255, het tweede byte noemen we het 
‘high-byte’ en staat voor een waarde tussen 256 en 65280. Met andere woorden: 
het adres is de waarde “high byte’ x 256 + “low byte’. 

Dit gegeven wil nogal eens wat verwarring stichten. Let daarom goed op de 
tegenstrijdige verschijningsvormen, want in het geheugen staat een word dus in de 
volgorde laag/hoog opgeslagen; een monitor of assembler verwacht echter de (ons 
vertrouwde) hoog/laag-volgorde! 


Het gaat dus om een adres. Voor bepaalde instructies zoals bijvoorbeeld de 
spronginstructie en de subroutine-instructie is dit adres alleen van belang als 
PC-waarde. Voor andere instructies, bijvoorbeeld een load-instructie of een store- 
instructie, is het adres nodig in verband met de waarde die zich op die geadres- 
seerde geheugenplaats bevindt. Een paar voorbeelden: JP $0000, CALL $00CO, 
LD A,($E000), LD ($E000),A enz. 
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3.4 Zero page-adressering 


Voor sommige microprocessors geldt dat het werken met zero page-adressering is 
verheven tot een aparte kunstvorm. In een Z80 daarentegen is er in feite maar één 
instructie die het speciaal in de zero page (De eerste 256 bytes van het geheugen, de 
geheugenplaatsen $0000 tot en met $OOFF) zoekt. 

Het gaat hier om een speciale CALL-instructie die in acht verschillende formaten 
voorkomt. Een zeer snelle instructie, die voorziet in een routineruimte van 8 bytes. 
Bijvoorbeeld: RST 00, RST 08, RST 16 enz. 


3.5 Relatieve adressering 


Relatieve adressering gebruikt twee bytes. Het eerste byte verstrekt de opcode en 
het tweede byte verzorgt de verplaatsing. In tegenstelling tot de absolute adresse- 
ringsvorm is de relatieve adresseringsvorm verplaatsbaar. Logisch, want de posi- 
tieve of negatieve sprongcalculatie hangt alleen maar af van de waarde van de PC 
op dat moment. Een positieve verplaatsing (In het tweede byte staat bit 7 op nul; 
VoOxxxxxxx) wordt bij de PC opgeteld. Een negatieve verplaatsing (Bit 7 van het 
tweede byte is geset: % 1xxxxxxx) wordt van de PC afgetrokken. Bijvoorbeeld: JR. 
$C000 op het adres $CO10 is toegestaan. JR SCO00 op het adres $D010 is niet 
toegestaan! 

Let wel goed op, aangezien u heel gemakkelijk deze ‘branch’-grens overschrijdt 
(De HERBYMON geeft gelukkig een waarschuwing). 


3,6 Geïndexeerde adressering 


Geïndexeerde adressering is een adresseringsmogelijkheid die vooral handi g is 
voor het werken met tabellen. Heel erg nuttig als de elementen uit zo’n tabel elkaar 
opvolgen, aangezien u dan van dezelfde bewerkingsinstructie gebruik kunt blijven 
maken terwijl u toch alle tabelingangen kunt adresseren. 


Hoe werkt zoiets? In het indexregister (IX of TY) staat een adres, meestal het begin 
van een tabel. Bij dit adres wordt een eventuele verplaatsing opgeteld en zodoende 
ontstaat een eindadres dat op ongeveer dezelfde manier als bij de directe adresse- 
ringsvorm kan worden gebruikt. 

U heeft nu verschillende mogelijkheden. U verandert het indexregister (met 
speciale increment- of decrement-instructies) of u zorgt voor variërende verplaat- 
singen. In het ene geval doorloopt u een tabel met variërende lengte en in het 
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beheugen 


Verplaatsing | 





Tabel] 


(Tabel + Verplaatsing) 





Afb. 3.1. Geïndexeerde adressering 


andere geval kunt u een meervoudige tabel eenvoudig bewerken. 
In Z80-machinecode kunt u deze geïndexeerde adressering op een aantal instruc- 
ties loslaten. Bijvoorbeeld: ADD, INC, RLC, LD, SET enz. 


3.7 Indirecte adressering 


Indirecte adressering is een redelijk complexe adresseringsvorm waarbij gebruik 
wordt gemaakt van een pointer-structuur. U moet zich voorstellen dat u een 
bepaald adres aanspreekt. Op dit adres bevindt zich een 16-bits waarde die wijst 
naar een bepaalde geheugenlocatie. En pas in deze locatie vindt u het gewenste 
getal. 

Eigenlijk is het een ‘dubbele’ adressering. U gebruikt deze adressering voorname- 
lijk om erg snel een aantal verplaatste tabelgebieden te kunnen bereiken! 


Met de Z80-microprocessor doet u dit voornamelijk met de registerparen BC, DE 
en HL. Deze dienen dan als link-adres. Bijvoorbeeld: LD A,(DE), LD B‚(HL), 
OR (HL) enz. 
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Afb. 3.2. Indirecte adressering 


3,8 Bitadressering 


Bitadressering duidt op de mogelijkheid om aparte byte-onderdelen te kunnen 
aanspreken. Een byte bestaat uit acht afzonderlijke bits, genummerd van 0 tot en 
met 7. 

In sommige gevallen heeft u voldoende aan bitinformatie en het zou in zo’n geval 
erg handig zijn om zo’n bit rechtstreeks te kunnen aanspreken. De Z80-micropro- 
cessor heeft ook hiervoor een aantal mogelijkheden, zoals de instructies BIT, RES 
en SET. 
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4 De complete instructieset van de 
Z80 


U weet inmiddels van de hoed en de rand voor wat betreft de belangrijkste Z80- 
principes. We gaan nu dan ook de hele Z80-instructieset de revue laten passeren. 
In alfabetische volgorde worden alle afzonderlijke instructies besproken. Als u 
reeds bekend bent met de instructieset heeft u voldoende aan appendix A, waarin 
u ook terecht kunt voor de juiste codering, de flag-beïnvloeding en de tijds- 
duur.….en niet te vergeten de juiste HERBYMON-syntax en alle mogelijkheden! 
We gaan hier alleen kijken wat die instructies nu precies doen. Waar nodig krijgt u 
ook extra informatie. Geen zorgen als u iets niet begrijpt; in de hierop volgende 
hoofdstukken komen we overal nog uitgebreid op terug. 


4,1 Even vooraf 


In appendix A staan alle bestaande Z80-instructies nog eens goed beschreven. 
Wilt u precies weten wat er mogelijk is of van welke HERB YMON-syntax u zich 
moet bedienen dan kunt u zich beter in deze appendix oriënteren. In het nu 
volgende overzicht onderzoeken we alleen hoe alle instructies nu precies werken. 
Het valt daarom buiten het kader van dit overzicht om van alle verschijningsvor- 
men een instructie te geven. 

We maken slim gebruik van enige afkortingen: 


rr r b co zp 
AF Ä 0 Z 00 
BC B | NZ 08 
DE C 2 C 10 
HL D 3 NC 18 
IX E 4 PO 20 
TY H 5 PE 28 
SP L 6 P 30 

7 M 38 
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Bij rr gaat het veelal om een speciale selectie, zie hiervoor de appendix! 

Kijk ook voor co nog even in de appendix. Afwijking in een heel enkel geval. 
nn wil zeggen dat we met een byte-waarde te maken hebben. 

iis een afkorting van ‘IX + nn’ of TY + nm’. 

nnnn is een adres of een word. 

Een logische AND wordt als „and. genoteerd. 

Een logische OR wordt als .or. genoteerd. 

Een relatieve sprongcalculatie wordt als .rel. genoteerd. 

Een logische XOR wordt als .xor. genoteerd.) 


4,2 De instructies op een rij 


ADC 


Dit is een algemene optel-met-carry-instructie. De gegeven (tweede) operand 
wordt samen met de carry-flag uit het statusregister bij de eerste operand opgeteld 
waarna het resultaat weer in de eerste operand terechtkomt. 


Formaat 
ADC Ar 
ADC Ann 
ADC A‚(HL) 
ADC A (ii) 
ADC HL,rr 


ADD 


Functie 

À <— Á + r + carry 

Á — A + nn + carry 
A — A + (HL) + carry 
A «— A + (ii) + carry 
HL — HL + rr + carry 


Dit is een algemene optelinstructie. De tweede operand wordt bij de eerste 
opgeteld waarna het resultaat in de eerste wordt geplaatst. (Let wel, zonder carry!) 


Formaat 
ADD Ar 
ADD Ann 
ADD A‚(HL) 
ADD A(zi) 
ADD HL rr 
ADD IX,rr 
ADD IY „rr 


Functie 

Â «A +tr 

À «— A + an 
À +— A + (HL) 
À + ÀA + (ij) 
HL «— HL + rr 
IX «— IX + rr 
TY « IY + rr 
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AND 


Dit is een logische AND-operatie die wordt uitgevoerd op de accumulator en de 
aangegeven operand. Het resultaat wordt weer in de accumulator geplaatst (let 
ook even op de waarheidstabel). 


Formaat Functie 

AND r Ä «— A and. r 
AND nn A -— A and. nn 
AND (HL) À <— A and. (HL) 
AND (úi) A «<— A and. (ii) 
Ä B À and B 

0 0 0 

0 1 0 

l 0 0 

1 1 Ì 

BIT 


Dit is een test op het opgegeven bit uit een geadresseerde operand. Het resultaat 
beïnvloedt de zero-flag overeenkomstig de bitwaarde. (Bit ‘0’ dan zero-flag geset, 
bit ‘1’ dan zero-flag gecleard.) 


Formaat Functie 

BIT br Z « ‘Test’ bit bin r 
BIT h‚(HL) Z « ‘Test’ bit b in (HL) 
BIT b,(i) Z «- ‘Test’ bit b in (ii) 
CALL 


Er wordt een subroutine op het opgegeven adres aangeroepen. 
De inhoud van de programmateller wordt op de stapel gezet. Uit de twee bytes die 
op de instructiecode volgen, komt het nieuwe adres; dit wordt in de PC geplaatst. 
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Formaat Eunctie 








CALL nann (SP — 1) — PC-high 
(SP — 2) « PC-low 
PC « nnann 
SP «+ SP —2 
Progr ana | 
aren | = 
rare | | vel | 
add A 
|CALL S1 TE | 
Lenen Ei 
ús 
| UIEN 
| BEE S7 
INI reen 
nd ee | 
| UIA IEI | ‚RET | 


Afb. 4.1. Werken met subroutines 


CALL cc 


Indien aan de voorwaarde ec wordt voldaan, wordt een subroutine op het 
meegegeven adres aangeroepen. (De inhoud van de huidige programmateller 
wordt op de stapel gezet. Uit de twee bytes die volgen op de instructiecode komt 
het nieuwe adres, dit wordt in de PC geplaatst.) Als daarentegen niet aan de 
voorwaarde ec wordt voldaan, wordt de instructie overgeslagen. 


Formaat Functie 
CALL ee‚nnnn (SP — 1) — PC-high 
(SP — 2) — PC-low 
SP — SP — 2 
PC «— nnnn 
** * mits ee waar* * * 


di 


CCF 


Complementeer de carry-flag. (01 / 10) 


Formaat Functie 
CCF carry «— carry .xor. Ì 
CP 


Vergelijk de opgegeven operand met de accumulator. 

Dit komt in principe neer op een aftrekking zonder carry waarna het resultaat 
wordt weggegooid. 

Na afloop kan eventueel op een aantal voorwaarden worden getest : 


Test Accumulator is.….in vergelijking met de operand 
NC groter/gelijk (>=) 

& kleiner (sE) 

NZ ongelijk (<>) 

Z gelijk ze) 
NC/NZ groter (>) 

C/Z kieiner/gelijk (=<) 
Formaat Functie 

CP r flags o.i.v. A —r 

CP nn flags o.l.v. À — nn 
CP (HL) flags o.i.v. A — (HL) 
CP (ii) flags o.i.v. À — (fi) 
CPD 


Vergelijking met automatische verlaging. 

De inhoud van het door (HL) geadresseerde byte wordt van de accumulator 
afgetrokken. Het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud van 
zowel HL als BC met één verlaagd. (Wordt veel gebruikt voor gecontroleerde 
blokvergelijkingen.) 
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Formaat Functie 


CPD flags o.i.v. A — (HL) 
HL «+ HL — Ì 
BC «— BC — 1 
CPDR 


Blokvergelijking met automatische verlaging, alleen wordt dit net zolang her- 
haald tot ‘BC = 0’ of als ‘A = (HL). 

De inhoud van het door (HL) geadresseerde byte wordt van de accumulator 
afgetrokken, het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud van 
zowel HL als BC met één verlaagd. Nu wordt gekeken of ‘BC ==’ of 
'Á = (HL)’..is dit niet het geval dan wordt de instructie nogmaals uitgevoerd. 


Formaat Functie 

CPDR flags o.i.v. A — (HL) 
HL <— HL — Í 
BC «— BC — 1 


net zolang herhaald tot ‘BC = 0’ of ‘A = (HL)’ 


CPI 


Vergelijking met automatische verhoging. 

De inhoud van het door (HL) geadresseerde byte wordt van de accumulator 
afgetrokken, het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud van 
HL met één verhoogd en de inhoud van BC met één verlaagd. Wordt veel gebruikt 
voor gecontroleerde blokvergelijkingen. 


Formaat Functie 

CPI flags o.l.v. A — (HL) 
HL <- HL + 1 
BC «— BC — 1 

CPIR 


Blokvergelijking met automatische verhoging, alleen wordt dit net zolang her- 
haald totdat ‘BC = @’ of ‘A = (HL)’. 
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De inhoud van de door (HL) geadresseerde geheugenplaats wordt van de accumu- 
lator afgetrokken, het resultaat wordt niet gebruikt. Vervolgens wordt de inhoud 
van HL met één verhoogd en de inhoud van BC met één verlaagd. Nu wordt 
gekeken of ‘BC = 0’ of ‘A = (HL)’. Is dit niet het geval dan wordt de instructie 
nogmaals uitgevoerd. 


Formaat Functie 

CPIR flags o.i.v. Â — (HL) 
HL — HL + 1 
BC « BC — 1 


net zolang herhaald tot ‘BC = 0’ of ‘A = (HL)’ 


CPL 


Complementeer de accumulator. 
De inhoud van de accumulator wordt geïnverteerd (Bits die ‘0’ zijn worden ‘1’ en 
andersom) en weer in de accumulator geplaatst. 


Formaat Functie 
CPL Ä «— A .xor. SFF 
DAA 


Maak de inhoud van de accumulator ‘packed BCD'. 

Er wordt voorwaardelijk zes (6) opgeteld bij het rechter- en/of linkernybble van de 
accumulator. Deze optelling is onder meer afhankelijk van de inhoud van het 
statusregister. U gebruikt deze instructie veelal NA een rekenkundige bewerking, 
om zo het resultaat (weer) BCD te krijgen. 


Formaat Functie 
DAA A «— packed BCD 
DEC 


De geadresseerde operand wordt met één verlaagd waarna het resultaat weer in 
diezelfde operand terechtkomt. 
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Formaat Functie 


DEC r re r—l| 

DEC (HL) (HL) — (HL) — 1 
DEC (ii) (ii) — (HL) — 1 
DEC rr rr rr — | 

DEC IX IX «IX — 1 
DEC TY IY « IY —1 

DI 


Na deze instructie worden geen interrupts meer uitgevoerd. Een speciale inter- 
rupt-flag wordt 0 gemaakt, met als gevolg dat er geen maskeerbare interrupts 
meer worden ‘doorgelaten’. Na de El-instructie worden wel weer interrupts 
toegestaan. (U kunt deze instructie ook in een interrupt gebruiken, om eventueel 
volgende interrupts te elimineren.) 


Formaat Functie 
Di IEF «- 0 
DJINZ 


Het register B wordt met één verlaagd en er wordt relatief gesprongen als het 
resultaat van de verlaging NZ opleverde. (Deze instructie is natuurlijk ideaal voor 
programmalussen die altijd een van tevoren vastgestelde ‘doorlooplengte’ heb- 
ben. FOR... .NEXT-simulatie dus.) 


Formaat Functie 

DINZ nn B B— 1 
als NZ dan PC «- PC rel. nn 
als Z dan volgende instructie 


EI 


Na deze instructie worden weer interrupts uitgevoerd. Een speciale interrupt-flag 
wordt geset met als gevolg dat er weer maskeerbare interrupts worden doorgela- 
ten. 
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Formaat Functie 
EI IFF « Ì 


EX 


Verwissel de opgegeven operands met elkaar. (Te vergelijken met het BASIC 
SWAP-commando.) 

De inhoud van de geadresseerde operands wordt verwisseld met die van hun 
tegenhangers. Deze alternatieve registers bevinden zich in een aparte register- 
bank. 


Formaat Functie 

EX AF,AF’ AF «-— AF 

EX DE,HL DE «—-— HL 

EX (SP), HL H «+ — (SP + 1) 
L + — (SP) 

EX (SP),IX IX-high «+ —> (SP + 1) 
IX-low «+ — (SP) 

EX (SP), TY IY-high « — (SP + I) 


IY-low «+ — (SP) 


EXX 


Verwissel de BC-, DE- en HL- ‘gewone’ registers met hun ‘alternatieve’ tegenhan- 
gers. 


Formaat Functie 

EXX BC «-— BC 
DE «+ — DE’ 
HL -——> HL’ 

HALT 


De werking van de Z80-microprocessor wordt stilgelegd. 
Na de HALT-instructie worden alleen nog maar NOP'’s uitgevoerd. Dit alles 
gebeurt totdat een interrupt plaatsvindt of een reset wordt gegeven. 
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Formaat Functie 
HALT CPU gaat ‘op slot’ 
IM 0 


Kies interrupt-mode 0. (Het apparaat of de chip dat de interrupt genereert, zet de 
uit te voeren instructie op de databus.) 


Formaat Functie 
IM 0 Interrupt-mode 0 
IM 1 


Kies interrupt-mode 1. (Er wordt een ‘RST 38’-instructie uitgevoerd als er een 
interrupt optreedt.) 


Formaat Functie 
IM 1 Interrupt-mode 1 
IM 2 


Kies interrupt-mode 2. (Het apparaat of de chip dat de interrupt genereert, zet het 
low-byte van een sprongadres op de databus. Het I-register zorgt voor het high- 
byte.) 


Formaat Functie 
IM 2 Interrupt-mode 2 
IN n(C) 


Via het C-register wordt een randapparaat of een chip (zie appendix) geadres- 
seerd. Dit randapparaat wordt uitgelezen en het resultaat komt in het gewenste 
register te staan. 
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Formaat Functie 
IN r,(C) r<- (C) 
IN A,‚(an) 


Het door middel van ‘nn’ geadresseerde randapparaat (of een geadresseerde chip) 
wordt uitgelezen. Het resultaat wordt in de accumulator geplaatst. 


Formaat Functie 
IN A(n) À «— (nn) 
INC 


De geadresseerde operand wordt met één verhoogd, waarbij het resultaat weer in 
diezelfde operand terecht komt. 


Formaat Functie 

INC r re r +] 

INC (HL) (HL) — (HL) + 1 
INC (úi) (ii) — (HL) + Ì 
INC rr ree rr + ] 

INC IX IX «- IX +1 
INC TY IY «—IY +1 
IND 


Input met automatische verlaging. Het randapparaat dat door het C-register is 
geadresseerd, wordt uitgelezen. Het verkregen resultaat komt in het adres waar 
(HL) op dat moment naar wijst. Na afloop worden zowel HL als B met één 
verlaagd. 


Formaat Functie 

IND (HL) «— (C) 
B «B — | 
HL — HL — 1 
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INDR 


Blok-input met automatische verlaging. Het randapparaat dat door het C-regis- 
ter is geadresseerd, wordt uitgelezen. Het resultaat komt in het adres waar (HL) 
op dat moment naar wijst. Na afloop worden zowel HL als B met één verlaagd. 
Als B ongelijk aan nul is, wordt de instructie nogmaals uitgevoerd. 


Formaat Functie 

INDR (HL) — (C) 
B «B — | 
HL <- HL — 1 


net zolang herhaald tot ‘B = 0’ 


INI 


Input met automatische verhoging. Het randapparaat dat door het C-register is 
geadresseerd, wordt uitgelezen. Het resultaat komt in het adres waar (HL) op dat 
moment naar wijst. Na afloop wordt HL met één verhoogd en B met één verlaagd. 


Formaat Functie 
INI (HL) — (C) 
B <- B — 1 
HL <- HL +1 
INIR 


Blok-input met automatische verhoging. Het randapparaat dat door het C-regis- 
ter is geadresseerd, wordt uitgelezen, het resultaat komt in het adres waar (H L)op 
dat moment naar wijst. Na afloop wordt HL met één verhoogd en B met één 
verlaagd. Als B ongelijk aan nul is, wordt de instructie nogmaals uitgevoerd. 


Formaat Functie 

INIR (HL) «+ (C) 
B «B —1 
HL «— HL +1 


net zolang herhaald tot ‘B = 0’ 
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JP 


Er wordt gesprongen naar het adres dat in de opgegeven operand staat. 
De JR-instructie levert twee bytes aan die in de PC worden geplaatst. Bij de 
eerstvolgende instructie werkt het programma vanaf die plaats. 


Formaat Functie 

JP nnnan PC «— nann 
JP (HL) PC «— HL 
JP (LX) PC «— IX 
JP (TY) PC «— IY 
JP cc 


Indien aan ec wordt voldaan, wordt een sprong naar het opgegeven adres ge- 
maakt. 

Indien cc klopt, levert de JR-instructie twee bytes aan die in de PC worden 
geplaatst. Bij de eerstvolgende instructie werkt het programma vanaf die plaats. 
Wordt niet aan ec voldaan dan wordt de instructie verder genegeerd. 


Formaat Functie 
JP ec‚nnnan PC «— nnnn 
kk * mits ce waar* * * 


JR 

Er wordt een relatieve sprong gecalculeerd en gemaakt. 

Er wordt gebruik gemaakt van het positief of negatief zijn van de meegeleverde 
waarde. Deze waarde wordt bij de PC opgeteld (of afgetrokken) om zo het nieuwe 


adres te verkrijgen. Hierdoor zijn sprongen van — 126 tot + 129 mogelijk. 


Formaat Functie 
JR an PC «— PC rel. nn 
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JR cc 


Indien aan cc wordt voldaan, wordt een sprong gecalculeerd en gemaakt. 

Als ce klopt, wordt er gebruik gemaakt van het positief of negatief zijn van de 
meegeleverde waarde. Deze waarde wordt bij de PC opgeteld (of ervan afgetrok- 
ken) om zo het nieuwe adres te verkrijgen. Als niet aan de gestelde conditie cc 
wordt voldaan, wordt de instructie verder genegeerd. 


Formaat Functie 
JR ee‚nn PC « PC rel. nn 
* * * mits ce waar”* * * 


LD 


Er wordt een ‘load/store’-instructie uitgevoerd. Dit is de meest veelzijdige Z80- 
instructie. In principe komt het neer op ‘data-verplaatsing’. 

De inhoud van de tweede geadresseerde operand wordt in de eerste geadresseerde 
operand geplaatst. De LD-instructie dient dus tegelijkertijd als ‘load’- en ‘store’- 


instructie. 


Formaat Functie 

LD rr‚(nrnnan) rr-low «+ (nn) 
rr-high « (nn + 1) 

LD rr‚nnnn rr nnnn 

LD r‚nn re nn 

LD r‚r' re r 

LD (rr),A (rr) — A 

LD (HL),nn (HL) — nn 

LD (HL),r (HL) «— r 

LD r‚(ii) re (ii) 

LD (ii),‚nn (il) — nn 

LD (ir (ii) — r 

LD A,(nann) À «— (naan) 

LD (nann),Â (nann) — À 

LD (nnnn),rr (nn) — rr-low 
(nn + 1) & rr-high 

LD A(rr) À & (rr) 

LD Al ÄÁ «+ 
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LD LA [- À 


LD A‚R Ä — R 
LD R‚A R — A 
LD SP.rr SP + rr 
LD r,(HL) r<- (HL) 
LDD 


Laden met automatische verlaging. 

Deinhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (DE) 
geadresseerde locatie geplaatst. Vervolgens worden BC, DE en HL met één 
verlaagd. 


Formaat Functie 

LDD (DE) « (HL) 
DE «— DE — Il 
HL — HL — 1 
BC «— BC — Ì 

LDDR 


Blok laden met automatische verlaging. De inhoud van de door (HL) geadres- 
seerde geheugenplaats wordt in de door (DE) geadresseerde locatie geplaatst. 
Vervolgens worden BC, DE en HL met één verlaagd. Nu wordt gekeken of 
‘BC = 0’. Als dit het geval is, wordt de lus onderbroken. Zo niet dan wordt de 
instructie nogmaals uitgevoerd. 


Formaat Functie 

LDDR (DE) « (HL) 
DE « DE — 1 
HL «— HL — Il 
BC «— BC — 1 


net zolang herhaald tot ‘BC = 0’ 
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LDI 


Laden met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (DE) 
geadresseerde locatie geplaatst. Vervolgens worden DE en HL met één verhoogd. 
BC wordt met één verlaagd. 


Formaat Functie 

LDI (DE) « (HL) 
DE «— DE + 1 
HL «+ HL + 1 
BC « BC — 1 

LDIR 


Blok laden met automatische verhoging. 

Deinhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (DE) 
geadresseerde locatie geplaatst. Vervolgens worden DE en HL met één verhoogd. 
BC wordt met één verlaagd. Nu wordt gekeken of BC gelijk is aan nul. Is dit het 
geval dan wordt de lus onderbroken. Zo niet dan wordt de instructie nogmaals 
uitgevoerd. 


Formaat Functie 

LDIR (DE) — (HL) 
DE «- DE + 1 
HL «+ HL + Ì 
BC «— BC — 1 


net zolang herhaald tot “BC = 0’ 


NEG 
Trek de accumulator af van nul (0). 


Formaat Functie 
NEG Ä <0 — A 
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NOP 


’Loze’ operatie, er wordt gedurende 1 cyclus niets gedaan. 


Formaat Functie 
NOP niets 
OR 


Dit is een logische OR-operatie die wordt uitgevoerd op de accumulator en de 
aangegeven operand. Het resultaat wordt weer in de accumulator geplaatst. Let 
ook even op de waarheidstabel. 


Formaat Functie 

OR r Ä «— A .or.r 
OR nn À «- A or. nn 
OR (HL) À «— A or. (HL) 
OR (ii) Ä «— A or. (ii) 


A or B 


=S Pp 
== GP met OO 
mi gm 5 


mk 


OTDR 


Blok-output met automatische verlaging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (C) 
geadresseerde output-poort geplaatst. HL en B worden dan met één verlaagd. Als 
B nog niet gelijk aan nul is, wordt de instructie nogmaals uitgevoerd, in het andere 
geval wordt de lus onderbroken. 


Formaat Functie 
OTDR (C) — (HL) 
B «— B — ll 
HL + HL —] 


net zolang herhaald tot ‘B = 0’ 
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OTIR 


Blok-output met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (C) 
geadresseerde output-poort geplaatst. HL wordt met één verhoogd en B wordt 
met één verlaagd. Als B nog niet gelijk aan nul is, wordt de instructie nogmaals 
uitgevoerd, in het andere geval wordt de lus onderbroken. 


Formaat Functie 
OTIR (C) « (HL) 
B «B — ll 


net zolang herhaald tot ‘B = 0’ 


OUT (Or 


Plaats het register r in de via (C)' geadresseerde output-poort. 


Formaat Functie 
OUT (C),r (C) «rr 
OUT (an),A 


Plaats de accumulator in de door ‘nn’ geadresseerde output-poort. 


Formaat Functie 
OUT (nn), A (nn) — A 
OUTD 


Output met automatische verlaging. 
De inhoud van de door (HL) geadresseerde geheugenplaats wordt in de door (C) 
geadresseerde output-poort geplaatst. HL en B worden dan met één verlaagd. 
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Formaat Functie 


OUTD (C) « (HL) 
B B-—1 
HL — HL — 1 
OUTI 


Output met automatische verhoging. 

De inhoud van de door (HL) geadresseerde geheugenplaats wordt op de door (C) 
geadresseerde output-poort geplaatst. HL wordt met één verhoogd en B wordt 
met één verlaagd. 


Formaat Functie 

OUTI (C) + (HL) 
B<—-B—l 
HL «— HL + 1 

POP 


Haal twee bytes (een word) van de stapel en plaats deze in het geadresseerde 
registerpaar. 

De inhoud van het byte bovenop de stapel komt in het low-byte van het geadres- 
seerde registerpaar. Vervolgens wordt SP met één verhoogd. De inhoud van het 
byte dat daarna bovenop de stapel staat, komt in het high-byte van het geadres- 
seerde registerpaar. Tot slot wordt SP nog met één verhoogd. 


Formaat Functie 

POP rr rr-low «+ (SP) 
rr-high — (SP + 1) 
SP — SP + 2 

POP IX IX-low «+ (SP) 
IX-high «- (SP + 1) 
SP — SP +2 

POP IY FY-low «+ (SP) 
IY-high «+ (SP + 1) 
SP «— SP +2 
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PUSH 


Plaats het geadresseerde registerpaar op de stapel. 

SP wordt met één verlaagd en het high-byte van het geadresseerde registerpaar 
wordt op de stapel geplaatst. SP wordt opnieuw met één verlaagd en het low-byte 
van het geadresseerde registerpaar komt op de stapel. 


Formaat Functie 

PUSH rr (SP — 1) « rr-high 
(SP — 2) « rr-low 
SP «— SP —2 

PUSH EX (SP — 1) — IX-high 
(SP — 2) «— IX-low 
SP — SP — 2 

PUSH IY (SP — 1) «+ IY-high 
(SP — 2) « IY-low 
SP «— SP — 2 

RES b 


Dit is een reset op het opgegeven bit uit de geadresseerde operand. 


Formaat Functie 

RES br bit bin r<- 0 
RES 5,(HL) bit b in (HL) «— 0 
RES h‚(ii) bit bin (il) — 0 
RET 


Een subroutine wordt afgebroken. De PC wordt (net als bij POP) van de stapel 
gehaald en het programma ‘keert terug’. 


Formaat Functie 

RET PC-low « (SP) 
PC-high « (SP + 1) 
SP «— SP +2 
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RET cc 


Indien aan ec wordt voldaan, wordt een subroutine afgebroken. Zie ook bij RET. 


Formaat Functie 

RET ce PC-low « (SP) 
PC-high «+ (SP + 1) 
SP « SP + 2 


** * mits ee waar* * * 


RETI 


Terugkeer van een interrupt. 

Deze instructie gedraagt zich ongeveer als een gewone RET-instructie, met als 
enige verschil dat de processor nu het einde van een maskeerbare interrupt 
herkent. Het is in verband met eventuele interrupt-nesting zeer verstandig om 
vóór deze instructie een El-instructie te plaatsen! 


Formaat Functie 

RETI PC-low « (SP) 
PC-high «— (SP + 1) 
SP «- SP +2 

RETN 


Terugkeer van een niet-maskeerbare interrupt. 

Het gaat wederom om de terugkeer uit een interrupt, alleen wordt nu een speciale 
interrupt-flag hersteld. Dit om aan te geven dat maskeerbare interrupts weer zijn 
toegestaan. Een niet maskeerbare interrupt heeft altijd een hogere prioriteit dan 
een ‘gewone’ interrupt. Een hardware-reset heeft de allerhoogste prioriteit! 


Formaat Functie 

RETN PC-low « (SP) 
PC-high «— (SP + 1) 
SP «— SP +2 
IFF] «— IFF2 
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RL 


Roteer de gespecificeerde operand en de carry naar links. 
De inhoud van de carry komt tn bit 0, bit 0 gaat naar bit l..bit 6 gaat naar bit 7 
en bit 7 komt in de carry te staan. 


Formaat 
RLA 


RL r 
RL (HL) 


RL (ii) 


RLC 


Functie 

carry — (7...0) « carry 
AN 

carry « (7...0) «— carry 
ĳ 

carry «+ (7...0) + carry 
(HL) 

carry «+ (7...0) « carry 


(fi) 


Roteer de gespecificeerde operand naar links. 
Bit 7 gaat naar bit 0, bit 0 gaat naar bit 1 bit 6 gaat naar bit 7, bit 7 gaat naar de 


CarTy. 


Formaat 
RLCA 


RLC r 
RLC (HL) 


RLC (#) 


Functie 

carry « (7...0) — (7) 
Ä 

carry — (7...0) — (7) 
r 

carry «+— (7...0) « (7) 
(HL) 

carry «— (7...0) — (7) 
(di) 
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carry 
(Rotatie met carry} 


7654321868 
| 


EEE EE 





Carry 





[Rotatie] 


16545218 


carry Etten 


(Rekenkundige verschuiving} 


F6 5 4 5218 


—_—_ 


carry dede dede de de de de dn B 





CLogische verschuiving) 


Afb. 4.2. Verschuiven en roteren 


RLD 


Roteer decimaal naar links. 

Het low-nybble van de door (HL) geadresseerde geheugenplaats komt op het 
high-nybble van hetzelfde adres. Het high-nybble van dit adres zit inmiddels in het 
low-nybble van de accumulator, het low-nybble van de accumulator zit dan al in 
het low-nybble van de door (HL) geadresseerde geheugenplaats. 


Formaat Functie 

RLD + 
(7..4)(3..0) (7..4)(3..0) 
Ä (HL) 
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RR 


Roteer de gespecificeerde operand en de carry naar rechts. 
De inhoud van de carry komt in bit 7, bit 7 gaat naar bit 6, bit 1 gaat naar bit 0, 
bit 0 gaat naar de carry. 


Formaat Functie 

RRA carry — (7...0) — carry 
Ä 

RR r carry — (7...0) — carry 
r 

RR (HL) carry — (7...0) — carry 
(HL) 

RR (ii) carry — (7...0) — carry 
(ii) 

RRC 


Roteer de gespecificeerde operand naar rechts.Bit 0 gaat naar bit 7, bit 7 gaat naar 
bit 6, bit 1 gaat naar bit 0, bit OQ gaat naar de carry. 


Formaat Functie 

RRCA (0) — (7...0) — carry 
Ä 

RRC r (0) — (7...0) — carry 
r 

RRC (HL) (0) — (7...0) — carry 
(HL) 

RRC (ii) (0) — (7...0) — carry 
(di) 

RRD 


Roteer decimaal naar rechts. 
Het high-nybble van de door (HL) geadresseerde geheugenplaats komt op het 
low-nybble van hetzelfde adres. Het low-nybble van dit adres zit inmiddels in het 
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low-nybble van de accumulator, het low-nybble van de accumulator zit dan al in 
het high-nybble van de door (HL) geadresseerde geheugenplaats. 


Formaat Functie 
RRD > > 
(7..4(3..0) 7..4)(3..0) 
Ä (HL) 
RST zp 


Herstart op adres zp in de zero page. 

Net als bij een CALL-instructie wordt de PC op de stapel gezet. Het high-byte 
voor de PC wordt 0, en het low-byte bevat de meegegeven waarde. Hierna komt 
het programma in een stukje zero page terecht. 


Formaat Functie 

RST zp (SP — 1) — PC-high 
(SP — 2) — PC-low 
SP «— SP — 2 
PC-high « 0 
PC-low — zp 

SBC 


Dit is de algemene aftrek-minus-carry-instructie. De gegeven (tweede) operand 
wordt samen met de carry van de eerste operand afgetrokken, waarna het 
resultaat weer in de eerste operand terechtkomt. 


Formaat Functie 

SBC Ar Á — A —r — carry 
SBC A‚nn À «— A — nn — carry 
SBC A‚(HL) Ä «— A-(HL) — carry 
SBC A,(ii) Ä — A — (ii) — carry 
SBC HL,rr HL + HL — rr — carry 


SZ 


SCF 


Set de carry-flag. 


Formaat Functie 
SCF carry « Ì 
SET 


Dit is een ‘set’ van het opgegeven bit uit de geadresseerde operand. 


Formaat Functie 

SET br bit bin re 1 
SET b,(HL) bit bin (HL) — 1 
SET b‚(ii) bit bin (di) — Ì 
SLÁ 


Schuif de operand logisch naar links. 
Bit0 gaat naar bit 1 bit 6 gaat naar bit 7, bit 7 gaat naar de carry. Bit 0 wordt 0. 


Formaat Functie 

SLA r carry «— (7...0) — 0 
r 

SLA (HL) carry «…— (7...0) — 0 
(HL) 

SLA (zi) carry …— (7...0) — 0 
(4) 

SLI 


Schuif de operand rekenkundig naar links. 
Bit0 gaat naar bit 0, bit 0 gaat naar bit 1, bit 6 gaat naar bit 7, bit 7 gaat naar de 


CAITY. 
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Formaat Functie 


SLI r carry «…— (7...0) «+ (0) 
r 

SLI (HL) carry «— (7...0) « (0) 
(HL) 

SLI (ii) carry «…— (7...0) + (0) 
(di) 

SRA 


Schuif de operand rekenkundig naar rechts. 
Bit7 gaat naar bit 7, bit 7 gaat naar bit 6, bit 1 gaat naar bit 0, bit gaat naar de 
carry. 


Formaat Functie 

SRA r (7) — (7...0) — carry 
r 

SRA (HL) (7) > (7...0) > carry 
(HL) 

SRA (ii) (7) > (7...0) > carry 
(di) 

SRL 


Schuif de operand logisch naar rechts. 
Bit 7 gaat naar bit 6, bit 1 gaat naar bit 0, bit 0 gaat naar de carry. Bit 7 wordt 0. 


Formaat Functie 

SRL r 0 — (7...0) > carry 
r 

SRL (HL) 0 — (7...0) — carry 
(HL) 

SRL (ii) 0 — (7.0) > carry 
(ii) 
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SUB 


Dit is een algemene aftrekinstructie. De tweede operand wordt van de eerste 
operand afgetrokken, waarna het resultaat weer in de eerste operand terecht- 
komt. 


Formaat Functie 

SUB r Â —A-—r 
SUB nn Â — À — nn 
SUB (HL) À — A — (HL) 
SUB (ii) À «— A — (ii) 
XOR 


Dit is een logische XOR-operatie die wordt uitgevoerd op de accumulator en de 
aangegeven operand. Het resultaat wordt weer in de accumulator geplaatst. Let 
ook even op de waarheidstabel. 


Formaat Functie 

XOR r Â «- Axor. r 
XOR nn Ä — A .xor. nan 
XOR (HL) A — A .xor. (HL) 
XOR (ii) ÀÂ — A .xor. (ii) 
JN B A xor B 

Ó 0 0 

0 l ] 

l 0 l 

1 1 0 
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5 Getallen en hun representaties 


Er bestaan verschillende manieren om over getallen en aantallen te spreken. U 
kunt op de markt een hand opsteken en de koopman geeft u meteen vijf van die 
super-grote-super-rode paprika's. Twee keer met uw hoofd knikken en de friet- 
bakker pompt een ‘dubbel met’. 

De representatie van getallen zoals wij die kennen, is vrij simpel. We tellen van 0 
tot en met 9, daarna schuiven we alles naar links om te kennen te geven dat er nog 
een tiental (een honderdtal, duizendtal enz.) vóór staat. 


Voor de duidelijkheid nog een opmerking, om u straks de draad niet te laten 
verliezen: 

Een binair getal wordt vaak voorafgegaan door een ‘%'-teken, dus 2601010101 of 
%1010101010101010 zijn binaire getallen. 

Een decimaal getal herkent u aan het “#'-teken. #123, #4567 en # 54321 zijn dus 
decimale getallen. 

Een hexadecimaal getal wordt voorafgegaan door het ‘$'-teken, waardoor SEF, 
SFEDC en $0101 als hexadecimale getallen zijn bestempeld. 


5,1 Binair rekenen 


Heel eenvoudig, dat gereken, maar een computer begrijpt er decimaal gezien 
absoluut NIETS van. Het willoze apparaat kan alleen maar in termen van 
schakelaartjes denken. Zo’n schakelaar heeft maar twee standen, AAN of UIT, 
‘0’ of “17! 

Eén zo’n nulletje of eentje heet een bit. 4 bits naast elkaar noemen we een nybble, 8 
bits een byte, 16 bits een word en 32 bits een longword. 

Een bit kan dus maar twee waarden representeren: 0 of 1. En nu komt de grap, 
want net als met ‘ons’ decimale stelsel kunnen we naar links opschuiven. Laten we 
dus ook eens twee bits naast elkaar zetten! Vier mogelijkheden: 00, O1, 10 en 11. 
De getallen 0 tot en met 3 natuurlijk, maar hoe komen we daar dan aan? 


Het eerste bit geeft de ‘enkel’-tallige waarden. Gezien als een macht van twee 
wordt dit: 0*0 =O of 1 x 0 = ll. 
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Het tweede bit geeft de tien’-tallige waarden. Wederom gezien als een macht van 
twee: 0 x 2=0ofl x2=2. 


Zo kunnen we verder denken, totdat we bij acht bits (een byte) komen: 


Bit Maal macht van 2 
0 Ì 20 
| 2 2 
2 zi 2? 
3 8 2 
4 16 2 
5 32 2 
6 64 2e 
dj 128 De 


Drie voorbeelden: 


00000000: 0 x 128 
0x 64 
0x 32 
Ox 16 
Ox 8 
0 x 
0 x 
0x 


_— 2 A 





totaal: 0 


MET: x 128 


Em 
X MX XX XK XK XK X 
_— DN a OO On 


totaal: 255 
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01110001: Ox 128 


lx 64 
1x 32 
1x 16 
Ox 8 
Ox 4 
Ox 2 
1x Ì 
totaal: 113 


Voor 16-bits waarden is het enige dat u hoeft te doen de tabel te verlengen. Als we 
een 16-bits getal als twee bytes zien, wordt het resultaat: ‘high- 
byte’ x 256 + ‘low-byte’. Een voorbeeld: 


0101010110101010 — (%01010101 x #256) + %10101010 


01010101: 0 x 128 10101010: 1 x 128 
lx 64 Ox 64 
Ox 32 1 x 32 
1x 16 Ox 16 
Ox 8 lx 8 
IIx 4 Ox 4 
Ox 2 lot 2 
lx 1 Ox Ì 
subtotaal: 85 subtotaal: 170 


totaal: 85 x 256 + 170 — 21930 


5,2 Hexadecimaal rekenen 


Het vervelende van het rekenen met binaire getallen is de lengte en de onoverzich- 
telijkheid. Om een getal tussen 0 en 255 in te voeren, moet u acht keer op een toets 
drukken, terwijl de decimale invoer (met nullen aangevuld) slecht drie duwtjes 
vereist. Zeven, acht of negen bits... Van een afstand en/of zonder leesbril Is het 
allemaal hetzelfde, dus onoverzichtelijk! 

Decimaal en binair verdragen elkaar NIET, maar hexadecimaal en binair geluk- 
kig WEL! Het hexadecimale stelsel is het 16-tallige stelsel. Binair rekenen gebruikt 
2 waarden: Oen 1. Decimaal rekenen gebruikt 10 waarden: 0, 1,2, 3,4, 5,6, 7, 8en 
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9. Hexadecimaal rekenen gebruikt er natuurlijk zestien: 0, 1,2,3,4, 5,6,7,8,9, A, 
BC DEE: 


U voelt de bui al hangen, want “15 + 16 x 15’ is 255. Met andere woorden, aan 
twee hexadecimale digits heeft u al voldoende om een 8-bits waarde te represente- 
ren. Even een verhelderend staatje: 


Decimaal Binair Hexadecimaal 
00 0000 Û 
01 0001 l 
02 0010 2 
03 0011 3 
04 0100 4 
05 0101 5 
06 0110 6 
07 OL je 
08 1000 8 
09 1001 Q 
10 1010 À 
11 1011 B 
12 1100 C 
13 1101 D 
14 1110 E 
15 HI F 


Een hexadecimaal getal kan dus dezelfde waarde bereiken als vier binaire digits. 
Vier binaire digits noemden we een nybble. Het eerste nybble, het low-nybble, is 
dan te zien als de ‘enkele’ waarden. In een macht van 16 wordt dit: 0 x 0 = 0 of 
Ix0=l...of 15 x0= 15, 

Het tweede nybble, het high-nybble, is dan te zien als de ‘tien’-tallige waarden, 
wederom als een macht van zestien: Ox 16=0 of 1x 16 = 16...of 
15 x 16 = 240. 


Zo kunnen we verder denken, totdat we bij acht bits (een byte) komen: 


Nybble Maal 2-macht 
low l 169 
high 16 16! 
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Drie voorbeelden: 





00: Ox 16 
Ox 1 

totaal: 0 

FF: 15 x 16 
15 x Ì 

totaal: 255 

71: 7x 16 
1x 1 

totaal: 113 


Voor 16-bits waarden is wederom het enige dat u hoeft te doen, de tabel te 
verlengen. Of, als we een 16-bits getal als twee bytes zien: het resultaat wordt 
‘high-byte’ x 256 + ‘low-byte’. 

Een voorbeeld: 


55SAA — ($55 Xx #256) + SAA 


5: 5 x 16 AA: 10 x 16 
53 10 x 1 
subtotaal: 85 subtotaal: 170 
totaal: 85 Xx 256 + 170 — 21930 
5,3 ‘Rekenen’ in ASCII 


Een heel ander verhaal is het werken met karakters. Cijfertjes leveren geen 
probleem op, maar de computer moet ook nog iets zichtbaar kunnen maken. Als 
op een gegeven moment een teken op uw beeldscherm staat, kan het zijn dat het 
onze A voorstelt. Een computer rekent absoluut niet in ABC-tjes, dus moeten we 
terug denken, ver terug.… 


Om te beginnen bestaat een ‘A’ uit een aantal puntjes. Als de MSX in de 32 x 24 
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tekst-mode staat, bestaat een karakter uit een 8 x &-raampje. 8 puntjes in de 
breedte staan voor een lijn-bit-patroon. 8 bits is wederom een heel byte, dus waar 
een pixel ‘aan’ staat, staat een bit op “1°. Waar een pixel ‘uit’ staat, staat een bit op 
‘0’. Iedere lijn verbruikt één byte, dus 8 lijnen beslaan 8 bytes. Een voorbeeld: 


En 00100000 32 
ee aas 01010000 80 
re % 10001000 136 
Hanin een % 10001000 136 
UREN za % 11111000 248 
Van ea % 10001000 136 
deden ea % 10001000 136 
ele % 00000000 0 


Nu is de computer wel zo slim om u niet al die afzonderlijke puntjes te laten 
plotten. Ergens in het video-RAM bevindt zich een tabel waarin 256 verschillende 
8 x 8 patronen staan (zie appendix). Zo is er ook een bepaald stukje videogeheu- 
gen waar zich 32 x 34 is 768 bytes bevinden. Deze bytes beslaan het beeldscherm. 
Elke waarde in dit stukje van 768 bytes is niet meer dan een wijzer naar die 
karaktertabel met 8 x 8 blokjes. Nu wordt het simpel. Als er bijvoorbeeld een 0 
op het scherm staat, komt het nulde patroon uit de karaktertabel op het beeld. Een 
| heeft het eerste patroon, enz. (Een simpele berekening: tabelposi- 
tie = tabelbegin + 8 x schermwaarde) 


Een waarde staat voor een schermcode. We hebben 256 8-bits waarden en dus 256 
verschillende karakters. U geeft een POK E en op het scherm wordt de representa- 
tie van deze POKE-waarde meteen zichtbaar! 


Een heel ander verhaal krijgt u te horen bij het door de computer afdrukken van 
een teken. In het systeem-ROM (Ook wel BIOS genoemd) zitten een aantal 
handige routines die via een hoofd-ingang (CHPUT) worden aangeroepen. We 
noemen: ‘het scherm wissen’, ‘cursor links-boven’, ‘regel wissen’, ‘cursor naar 
beneden’, ‘een linefeed’, enz. En niet te vergeten... .Het afdrukken van een teken! 
AL deze bewerkingen moeten dus ook worden aangeroepen. Ook hier hebben we 
weer 256 verschillende mogelijkheden. Als we de afdrukroutine met de code 32 
aanroepen, wordt er een spatie op het beeldscherm afgedrukt. De waarde 13 
daarentegen zet de cursor in de meest linkse kolom. Ook zijn er codes voor 
‘HOME’, ‘CLS’, enz. 
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Alle ASCII-codes (Want afdrukken door het systeem vindt via dit speciale 
gestandaardiseerde protocol plaats!) hebben een speciale betekenis en ook werken 
zij meestal op een eventueel aangesloten printer. 

Op dit alles komen we in de programmeervoorbeelden nog uitgebreid terug. 
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6 Enkele basistechnieken 


Om u alvast een klein beetje op weg te helpen, volgen nu een aantal simpele 
voorbeelden, geschreven in HERBYMON. Per voorbeeld zullen we kijken wat 
het doet, maar vooral in welke programmeersituaties u zich van dergelijke tech- 
nieken kunt bedienen. 


Zoals het voorbeeld is afgedrukt, kunt u het met het assembleercommando 


invoeren. leder voorbeeld is in subroutineformaat geschreven. Als u vanuit de 
HERBYMON de C-instructie gebruikt, keert de routine dus netjes terug! 


6.1 Relatieve lussen 


s; COOO O6 10 LD B,$10 

.; COO02 C5 PUSH BC 

ss 003 CD-CO 00 CALL #00CO 
…s 6006 Cl POP BCG 

5 CO07 10 F9 DJNZ @CO002 
.5 COO CH RET 

.; COOA 00 NOP 

.; COOB O0 NOP 

5 COOC OÛ NOP 

.5 COOD OO NOP 

.; COOE 00 NOP 

‚ COOF 00 NOP 

<5 CO10 3E 40 LD A,$10 

Je GOEZ 32. 00: BO LD ($E0O00),A 
.; CO15 CD CO 00 CALL #00CO 
.; CO18 21 OO EO LD HL,$EOOO 
te GOTB 35 DEC (HL) 

.; GO1C 20 F7 JR NZ,@CO15 
.; COIE C9 RET 

„GOLF OO NOP 

‚5 CO20 3E 08 LD A,$08 

: CO22 32 00 EO LD ($E000),A 
00e SE 10 LD A,$10 

: CO27 32 Ol EO LD ($E0O0O1),A 
„5 CO2A CD CO 00 CALL $00C0 
 GO2D 21. 01 BO LD HL, $EOO1 
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CO30 35 DEC (HL) 


‚5 CO31 20 F7 JR NZ,@CO2A 

„… CO33 ZB DEC HL 

„3 CO34 35 DEC (HL) 

.; CO35 20 EE JR N2,@C025 
; CO37 C9 RET 


Heel vaak wilt u een aantal handelingen herhalen. Hiervoor moet u dus een lus 
maken. Een lus kunt u op verschillende manieren ontwerpen. Hieronder vindt u 
de beschrijving van een drietal mogelijkheden. 

Nog een algemene opmerking: de JR-instructies zijn ook te vervangen door 
JP-instructies. Houd er echter rekening mee dat dit uw routines langer maakt. 


De eerste lus is geïndexeerd. Het programma maakt handig gebruik van het 
B-register en de DJNZ-instructie. U kunt de instructie LD B. eenvoudig 
aanpassen om zo tot het gewenste aantal herhalingen te komen (start met C 
C000). 


Het tweede voorbeeld gebruikt een geheugenplaats voor het tellen van de herha- 
lingen. Een groot voordeel van een dergelijke lus is het feit dat u vrij van de 
registers gebruik kunt maken. Pas als u aan het einde van de lus bent gekomen, test 
u op het al dan niet herhalen (start met C C010). 


Het derde lus is een dubbele lus. In dit geval heeft u een binnen-en een buitenlus 
(start met C C020). 


6.2 Logische bewerkingen 


; COOO0 BF LD E‚Á 
.; COO1 E6 O0 AND $00 
., COO3 47 LD B,ÀÂ 
‚…;, CO04 7B LD A,E 
„5 COOB5 E6 FF AND SFF 
zi COOT AE LD C,A 
.; COO8 7B LD A,É 
‚, COO9 E6 55 AND $55 
ze GOOB 51 LD D,A 
.; COOC 7B LD A,E 
.5 COOD E6 AA AND $AA 
., COOF SF LD E,‚A 
si GOLD Gs RET 
„s GOELE 00 NOP 


ee) 
RN 
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CO12 
CO13 
CO14 
CO15 
CO16 
CO17 
CO18 
CO19 
CO1A 
CO1B 
CO1C 
CO1D 
CO1E 
COIF 
G020 
CO21 
CO23 
CO24 
CO25 
CO27 
CO28 
CO29 
CO2B 
CO2C 
COZD 
CO2F 
CO30 
CO31 
CO32 
CO33 
CO34 
CO35 
CO36 
CO37 
CO38 
CO39 
CO3A 
CO3B 
CO3C 
CO3D 
CO3E 
CO3F 
CO40 
CO41 
CO43 
CO44 
CO45 
CO47 
CO48 
CO49 
CO4B 


00 
00 
00 
OÛ 
00 
00 
00 
00 
00 
O0 
00 
00 
00 
OO 
SF 
F6 
41 
TB 
F6 
AF 
1B 
F6 
57 
7B 
F6 
DF 
C9 
00 
OO 
00 
00 
OQ 
OO 
00 
DO 
00 
00 
O0 
00 
00 
0Ò 
00 
SF 
EE 
47 
TB 
EE 
4F 
TB 
EE 
57 


00 


FF 


55 


00 


FE 


55 


Le DO u 
nj pe © De 


Ja Dr Cn u Le Fr 


5 

es, 
Herre PW kl 
> DE Ee 0 tel 
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„…, CO4C 7B LD A,E 


‚; CO4D EE AA XOR $AA 
…s CO4AF 5F LD E‚A 
.; CO50 C9 RET 


We gaan eens kijken wat het effect is van de drie logische bewerkingen of operaties 
AND, OR en XOR. Met het *-commando plaatst u een waarde in het A-register. 
De routine laat met de logische bewerking een viertal waarden ‘los’ waarna het 
resultaat in de B-, C-, D- en E-registers terechtkomt. (Het verkregen resultaat ziet 
u als de routine terugkeert). 


Het eerste voorbeeld demonstreert de OR-instructie (start met C C000). 


Het tweede voorbeeld demonstreert de AND-instructie (start met C C020). 

De AND-instructie wordt ook wel gebruikt om bepaalde bitpatronen te testen. U 
wilt bijvoorbeeld weten of in een bepaalde byte het getal 3 zit. In %00000011, 
0511000011, %01010111, enz. Als de laatste twee bits allebei op 1 staan, zit er dus 
een drie in het getal verborgen. In zo’n geval test u met AND $03, direct gevolgd 
door CP $03. Nu kunt u aan de hand van de Z-test te weten komen hoe het met die 
3 zat! 


Het derde voorbeeld demonstreert de XOR-instructie (start met C C040). 


6.3 Dat gedoe met die carry 


‚5 COOO0 37 SCF 
„3 COO1 3F CCF 
„5 CO002 ED 5A ADC HL,DE 
5 COO4 C9 RET 
„> CO0O05 00 NOP 
5 COO6 00 NOP 
.;s CO07 00 NOP 
‚ CO08 37 SCF 
.; COO9 ED 5A ADC HL,DE 
.; COOB C9 RET 
‚35 COOC 00 NOP 
> GOOD O0 NOP 
„s GOOE BO NOP 
‚5 COOF 00 NOP 
„.; C010 37 SCF 
ss GOL GE CCF 
‚ CO12 19 ADD HL,DE 


Gr 
en 


CO13 C9 RET 


„; CO14 OO NOP 
., CO15 OO NOP 
.; CO16 OO NOP 
.; CO17 OO NOP 
„> COLIS 37 SCF 
OTIS ADD HL,DE 
5 COTA GI RET 
.; GO1B O0 NOP 
ss GOTS: 00 NOP 
. CO1D OO NOP 
.; CO1E 00 NOP 
.; COIF O0 NOP 
„: COZ0 Sf SCH 
eet JE GCF 
‚> CO22 ED 52 SBC HL, DE 
‚> CO24 C9 RET 
ms 025 00 NOP 
.; COZ26 OO NOP 
… CO2r 00 NOP 
„6020 37 SCH 
ss COZ9 ED 52 SBC HL,DE 
., COZ2B C9 RET 
„3 CO2C 00 NOP 
‚…… CO2D 00 NOP 
„, COZE OO NOP 
‚ COZ2F 00 NOP 


"HERBYMON (V1.1) 
SP IY IX EL DE EBC A 
« 9D17 DE92 F38B BFA3 0007 0300 00 


16-bits rekenen gaat prima met een Z80-microprocessor. Het enige probleem 
vormt de carry. Wanneer moest dat ding nu WEL en wanneer NIET geset zijn? 
Hieronder zes voorbeelden voor de ADC-, ADD- en SBC-instructies. Met het 
*_commando voert u een aantal probeerwaarden in. U roept de subroutines aan 
en na afloop moet u eens goed op de waarde van het HL-registerpaar letten. 


Zes routines, zes startinstructies: C CO000, C CO008, C CO10, C CO018, C C020 en C 
CO28. 


6.4 Rekenen in de praktijk 


“; CO0O0 2A 00 EO LD HL, ($E000) 
°: CO03 ED 5B 02 EO LD DE, ($E002) 
_s CO07 19 ADD HL,DE 
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C008 
COOB 
COOG 
COOD 
GOOE 
COOF 
CO10 
CO13 
CO16 
CO17 
COlA 
CO1B 
CO1C 
CO1D 
CO1E 
COÌF 
CO20 
COZ1 
CO24 
CO28 
CO2A 
COZ2D 
CO2E 
CO2F 
CO30 
CO33 
CO36 
CO37 
CO3À 


* . . « : - ' . ' „ s " s . * = E " u . . - . . * = 1 
ee ge en en en en en ng en ge Mn gn ee ng en ge en nn en Vn en en nn en 


Optellen en aftrekken. „Een viertal voorbeelden waarin zowel met 16 bits als met 
8 bits wordt gewerkt. Het optellen demonstreert het A + B—>C-principe. Het 


22 
C9 
00 
00 
00 
00 
2t 
3Â 
86 
32 
Cg 
00 
00 
00 
00 


B7 
2À 
ED 
ED 
22 
Cg 
00 
00 
21 
3Â 
96 
32 
C9 


O4 


O1 
00 


O2 


00 
SB 
O8 
04 


O1 
00 


02 


EO 


EO 
EO 


EO 


EO 
Oz 


EO 


EO 
EO 


EO 


EO 


LD ($E0O04), HL 
RET 

NOP 

NOP 

NOP 

NOP 

LD HL, SLOOT 
LD A, ($E000) 
ÁDD A, (HL) 

LD ($E002),A 
RET 

NOP 

NOP 

NOP 

NOP 

NOP 

OR A 

LD HL, ($E000) 
LD DE, ($E002) 
SBC HL,DE 

LD ($E004), HL 
RET 

NOP 

NOP 

LD HL,$EOO1 
LD A, ($E000) 
SUB (HL) 

LD ($E002),A 
RET 


aftrekken gaat volgens de methode A — BC. 


Helaas bestaat er geen instructie SUB rr‚rr. Hierdoor moeten we bij het derde 
voorbeeld eerst de carry clearen. In plaats van SCH/CCF gebruiken we OR A, wat 


precies hetzelfde oplevert: de carry op Ô.… 


U start met C C000, C C010, C C020 en C030. Om de gevolgen te bekijken, geeft u 
een memory-display met M E000 E006. Verander ook de E000-E004 waarden 


eens! 
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7 De MSX en de buitenwereld 


7.1 De routines en hun doel 


In dit deel gaan we een aantal invoer- en uitvoertechnieken beschouwen. Invoer- 
technieken in verband met alles dat de computer IN gaat. Uitvoertechnieken in 
verband met alles dat de computer UIT gaat. 

Vooral dit laatste is van belang. Er bestaan eigenlijk geen computerprogramma'’s 
die iets ondernemen zonder dat de programmeur (of de gebruiker) daarvan In 
kennis wordt gesteld. Toegegeven: sommige processen zijn zó geheim dat een 
programmeur wil dat de gebruiker daarvan niet op de hoogte wordt gesteld, maar 
u als software-ontwikkelaar wilt natuurlijk precies weten wat er op welk moment 
staat te gebeuren en of dat allemaal wel correct gebeurt! 

Aan de andere kant moet een computer de te verwerken informatie kunnen 
opnemen, iets dat op verschillende manieren mogelijk is: via het toetsenbord, 
door middel van de joystick, door iets van een tape te laden enz. 


In de volgende hoofdstukken krijgt u een achttal listings voorgeschoteld. Deze 
omvatten de belangrijkste IO-principes; van het doodgewone ‘tekstje printen’ tot 
en met een ingewikkeld ‘cassette operating systeem’. 


7.2 Nog even vooraf 


De zo dadelijk te verwerken listings van subroutines komen in drie delen. Eerst 
krijgt u het gedeelte als een labelassemblerlisting (beter leesbaar en met enige 
structuur); dit is de listing die we zullen bespreken. Ten tweede ziet u een 
geheugendump, die u klakkeloos met HERBYMON kunt invoeren, temeer daar 
er vaak teksten moeten worden overgenomen. Het derde en laatste deel is een 
stukje ‘pure disassembly’. Dit is de code die u in de HERBYMON te voorschijn 
haalt en gaat gebruiken. 

Het startadres van een demonstratieprogramma is heel gemakkelijk te traceren. U 
kijkt in de assemblerlisting naar de Z80-code rond het label INIT, en u zoekt in de 
door u geproduceerde code naar dezelfde serie instructies. 

TIP: Het is ook mogelijk om de code te verplaatsen. U doet dit met de T-optie uit 
de HERBYMON, waarna u niet moet vergeten om de sprongadressen aan te 
passen. 


69 


8 Tekstje printen 


Dit voorbeeld demonstreert een simpele afdrukroutine die op de twee eerste 
scherm-modes (40*24 en 321*24) van toepassing is. We gaan ervan uit dat er 
ergens in het geheugen een aantal ASCII-codes werden geplaatst waarvan de 
laatste byte een nul is. 
Het is de bedoeling dat u het adres van deze string in het HL-registerpaar plaatst 
en vervolgens naar onze PRINT-subroutine springt. 
De ASCII-codes vindt u in appendix B. In principe kunt u gedocumenteerde 
ASCII-codes gebruiken om de tekst precies daar te plaatsen waar u vindt dat deze 
dient op te dagen. 
TIP: gebruik eventueel de BIOS-routine POSIT om de cursor ergens neer te 


zetten. 


10000 ORIGIN ($c000) 

10010 —- 

10020 $00a2 CONSTANT ChPut 
10030 $00ba CONSTANT IsceNte 


:Tekst2 ch “dit is een simpel voorbeeld van 


‘screen mode 0" 


10040 -—- 

10050 CODE 

10060 -—- 

10070 :Teksti ch “hallo wereld!" 
10080 ‚by $Oa,$0Od, 500 
10090 

ascii-uitvoer... 

10100 ‚by $Oa,$Od, 500 
10110 :Tekst3 eh “het werkt in 
WS 

10120 ‚by $Oa,$Od, 500 
LOLA0 == 

10140 :Print 

10150 Ìd a,(khl) 

10180 or a 

10170 retif az 

10180 call #ChPut 

10190 inc hl 

10200 je HPrint 

10210 -—- 

10220 <TRit 

10230 id hl,#Tekst1 
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en 


‘screen mode 


10240 call #Print 
10250 ld hl,#Tekst2 
10260 call HPrint 
10270 ld hlìl,#Tekst3 
10280 cal} #HPrint 
10290 :Wacht 

10300 call #IscNte 
10310 jp Fwacht 
10320 == 


10330 ENDCODE 


48 
AF 
52 
21 
dâ 
49 
45 
49 
4C 
4E 
45 
56 
41 
49 
54 
52 
OA 
45 
45 


41 
20 
45 
OA 
49 
53 
4E 
4D 
20 
52 
4G 
41 
53 
2D 
56 
2E 
OD 
54 
52 


AG 
57 
4C 
OD 
54 
20 
20 
50 
56 
42 
44 
4E 
43 
55 


4C 
45 
äd 
00 
20 
45 
53 
45 
AF 
45 
20 
20 
49 
49 
45 
2E 
48 
57 
a4 


„5 GO00 
‚: COO4 
‚: CO08 
: COOC 
: CO10 
: CO14 
<i GO18 
: CO1G 
5 CO020 
: COZ4 
.: CO28 
: CO2C 
en G040 
.: CO34 
: CO38 
.: GO3C 
.: CO40 
.: CO44 
: CO48 


2E 
00 
20 
4B 


7E 
B7 
C8 
CD 
23 
C3 
21 
CD 
21 
GD 
21 
CD 
CD 
C3 


CO76 
CO77 
CO 78 
CO79 
CO7C 
COT7TD 
CO80 
CO83 
CO86 
CO89 
CO8C 
CO8F 
CO92 
CO95 


A2 00 
B 
OO 
76 
10 
16 
43 
16 
BÀ 
92 


CO 
CO 
CO 
CO 
CÔ 
CO 
CO 
0Û 
CO 


SEAT CO4C 20 49 4E 20 * IN ' 
"Ò WE" CO50. 27-58 43 52 "ZSECR: 
LRELD" ‚: CO54 45 45 4B 20 VEEN ’ 
Be .: CO58 4D 4F 44 45 “MODE” 
UIT * „2 COS 20-90 27 20. 7 O7 7 
WES : CO60 45 4E 20 27 VEN * 

…EN SS" COB4 53 43 52 45 "SCRE” 
“TMPE" : CO68 45 4E 20 4D "EN M 
"EL VO“ COBC A4F 44 45 20 "ODE " 
VORBE " COT0 31-27 25 OA Tei 

VEED. © CaT4- 0D O0 7E BE "ira: 

UvAN * 2GOT8 C8 CD AZ OD "as 

ERST COTE 23 C3 76 GO “Kev: 

uT-UI" ‚… CO80 21 00 GO CD "La. 

UPYOE" „46084 76 CO ZL 10 wil 
UR, €088 CD -CD 76 CO "vm 

ann COST 21 43 60 CD "IG. 

ET WW" : CO90 76 CO CD BA “v... 

"ERKT" CO94 OO C3 92 CO * 

LD A, (HL) 

OR À 

RET 2 

CALL $00A2 

ING BL 

JP $CO76 

LD HL, $COOO0 

CALL $CO76 

LD HL, $CO10 

CALL $CO76 

LD HL, $CO43 

CALL $CO076 

CALL $OOBA 

JP $CO92 


zal 


PRINT is de eigenlijke subroutine. U heeft het adres van de string in HL staan en u 
maakt vervolgens een CALL naar deze subroutine. 

Eerst vergelijken we de door HL geadresseerde waarde met 0 (die OR A dient om 
de zero-flag wel of niet te setten). Is de waarde gelijk aan nul dan is de subroutine 
klaar en keren we netjes terug naar het hoofdprogramma. Zo niet dan nemen we 
het karakter mee naar de BIOS-routine CHPUT en het systeem zorgt voor de 
schermuitvoer. Daarna verhogen we HL om zo de volgende waarde uit de string te 
adresseren, waarna we weer naar PRINT springen. 


ISCNTC controleert op CTRL/STOP en springt terug naar BASIC als deze 
toetscombinatie is ingedrukt. 
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9 Invoer via het toetsenbord 


Een voorbeeld van een routine die invoer via het toetsenbord accepteert. U roept 
deze routine aan zorìder parameters, waarna de cursor verschijnt. Nu kan de 
gebruiker een ASCII-string met een door u (de programmeur) bepaalde lengte 
invoeren. Deze string wordt zowel op het scherm als op een door de programmeur 
bepaalde geheugenplaats gebufferd. Met Backspace wist u het laatst ingevoerde 
karakter. Ongewenste toetsen worden ‘wegge-beept’. Deze routine is zeer simpel 
te wijzigen qua invoerlengte en invoergedrag. 

Met deze subroutine kunt u nu alle toetsenbordinvoer regelen om deze later op uw 
gemak te bekijken. Pas als de gebruiker op de RETURN-toets drukt, wordt de 
routine afgebroken. 


TIP: wijzig de lengtetest voor geformatteerde invoer eens. Verander de test voor 
ASCII-uitstuiting, bijvoorbeeld alleen numerieke tekens, of juist alleen alfanume- 
rieke tekens. 


10000 ORIGIN ($e000) 

LOGE == 

10020 $006c CONSTANT IniTxt 
10030 $0O9f CONSTANT ChGet 
10040 $00a2 CONSTANT ChPut 
10050 $00ba CONSTANT IseNte 
10060 $00c0 CONSTANT Beep 
10070 $0156 CONSTANT KilBuf 
10080 == 

10090 CODE 

10100 == 

10110 :Teller .by $00 

10120 :Wijzer .wo $0000 
10130 ‘== 

10140 SReFSL „ER "noo umetie ak oe dn 7 
10150 ‚by $Oa,$Od, $0O 
10160 :Prompt ch ‘invoer: ” 
10170 ‚by #00 

19180 :Show by $0a,$0d 
10190 den =p 
10200 „by $0O 

10210 == 
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10220 
10230 
10240 
10250 
10260 
10270 
10230 
102390 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10330 
10380 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10430 
10500 
10510 
10529 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
106650 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
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sPrintE 


ld a, (hlj 
or a 

retif z 
call #ChPut 
inc hl 

jp EPrint 


BetUp 


id b,#16 
ld hì,#Regel 
Id (#Wijzer),hl 


sSetUp0 


Id a,#46 

id (hÌl),a 

ine hl 

djna #SetUp0 
ld a,#0 

ld (#Teller),a 
call #KilBuf 
id hl, #Prompt 


jp HPrint 
‘Delete 

ld a, (#Teller) 

cp #0 

IF na 

THEN 

dec a 
ld (#Tellerj,a 
dec hl 
ld hl, (#Wijzer) 
dec hl 
ld (#Wijzer),hl 
Id a,#46 
ìÌd (hl)‚a 
ld a,#$08 
call #ChPut 
ld a, #$20 
call #ChPut 
ld a,#$08 
call #ChPut 

FI 

ret 

Erbij 

cp #32 

Jpif cs,tBeep 

cp HIZT 

dpif no,tBeep 

push af 


Id a, {(#Teller) 


10740 cp #16 
10750 IF na 


10760 THEN 

10770 inc a 

10780 la (#Teller),a 
10790 ld hl, {(#Wijzer) 
10800 pop af 

10810 ld (hl),‚a 

10820 inc hìl 

10830 ld (#Wijzer),hl 
10340 call #ChPut 
10850 ret 

10860 Fi 


10870 pop af 

10880 ret 

10890: == 

10800 : Invoer 

10910 call #SetUp 
10920 :Invoer0 

10930 call #HIseNte 
10940 call #ChGet 
10950 cp #13 

10960 retif 2 
10970 cp #8 

10980 IF 2 

10990 THEN 
11000 call #Delete 
11010 ELSE 
11020 call #Erbij 
11030 FI 

11040 jp HInvoer0 
14050: == 

11060 :Init 

11070 call #IniTxt 
110380 :Init0 

11090 call HInvoer 
11100 ld hl,#&Show 
11110 call #Print 
11120 ld hl,t#Regel 
11130 call #Print 
11140 jp #Init0 
11150 =S 

11160 ENDCODE 


.: CO00 00 00 00 ZE “.... ‚: CO10 2E 2E 2E OA "arms 
„ie COOA 2E 2E 2E ZE Twe” ‚: CO14 OD 00 49 4E "..IN” 
‚: CO08 2E 2E 2E 2E ".... .: CO18 56 4F 45 52 "VOER 

s COOC 2E ZE EAB vann .: CO1C 3A 00 OA OD “":...” 
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CO20 


CO24 


CO028 


“1 CO2C 


CO30 


“: CO34 
: CO038 


CO3C 
CO40 


CO44 


CO48 


CO4C 


CO50 


‚ CO54 


CO58 


CO5G 


CO60 


CO64 


CO68 


“: CO6C 
ss GORD 


. r . . . . r * » * + - 1 - u " & Ll = * ä Là 5 = 
Ue han WE ne MW Mn EE gn en en OE he En WE nn on We nn en 


ml 
Or 


COT7T4 


CO23 
CO24 
CO25 
CO26 
CO29 
COZA 
COZD 
COZF 
CO32 
CO35 
CO37 
CO38 
CO39 
CO3B 
CO3D 
CO 40 
CO43 
CO46 
CO49 
CO4C 
CO4AE 
CO51 
CO52 
CO55 
CO56 
CO59 


2D 
B7 
00 
CO 
03 
CO 
23 
00 
CD 
16 
CO 
FE 
CO 
CO 
GO 
CO 
SE 
OO 
Az 
CD 
FE 
00 


TE 
B7 
C8 
CD 
23 
C3 
06 
el 
22 
3E 
17 
23 
10 
3E 
6 
CD 
al 
C3 
3A 
FE 
CA 
3D 
32 
2B 
AN 
2B 


3E 
C8 
23 
06 
CO 
3E 
10 
32 
56 
CO 
3À 
00 
3D 
25 
2B 
JE 
08 
3E 
00 
AZ 
20 
FE 


Â2 


23 
10 
03 
Oi 
2E 


FA 
00 
00 
56 
16 
23 
00 
00 
GF 


00 
Ol 


00 
CD 
C3 
10 
22 
2E 
FÀ 
00 
O1 
C3 
0Û 
CA 
32 
2Â 
22 
2E 
CD 
20 
3E 
00 
DA 
TE 


00 
CO 


CO 
CO 


CO 
O1 
CO 
CO 
CO 


CO 
CO 
CO 


7E 
ÄZ 
23 
21 
Oi 
TE 
3E 
CO 
21 
23 
CO 
6E 
00 
Ol 
01 
EL 
A2 
CD 


C9 
CO 
D2 


REK „: €078 CO 00 F5 3A 
Vid ‚: CO7TC OO CO FE 10 " 
nk, #7 .: CO80 CA 93 CO SC 


„5 KA ee 


Man ‚: CO84 32 OO CO 2A "2. 
SA ‚GOS Ol CO ET A7 "a, 
OP.Ww .: COB8C 23 22 O1 CO "ER". 
"E.D „: CO90 CI AZ O0 F1 "....” 
nn. se 09 CI CD 2D GO Voet 
Et ad: ‚: CO98 CD BA 00 CD "* 

R” .: CO9C IF 00 FE OD ".... 
Te „: COA0 C8 FE 08 C2 ".,..." 
ee .: COA4 AC CO CD 49 “"‚..I" 
"eg." ‚: COA8 CO CI AF CO *"‚,...” 
en sEGOAG CD: 70 CO CI pe 
ae ‚: COBO 98 CO CD 6C "...1" 
WP.Ww ‚e GOB4 DO CD 95 CO Poro 
ERE ‚: COB9 21 IE CO CD “!,.,." 
di .: COBC 23 CO 21 03 “"#‚l,* 


Be: .: COCO CO CD 23 CO "..#." 
zin : COC4 C3 B5 CO CO *"..,..” 


LD A,‚ (HL) 

OR A 

RET Z 

CALL SOOAZ 
INC HL 

JP $CO23 

LD B, 510 

LD HL, $COO3 
LD ($COO1),HL 
LD A,$2E 

LD (HL),A 
INC BL 

DJNA @CO35 
LD A,$00 

LD ($COOO),A 
CALL $0156 
LD HL,$CO16 
JP $CO23 

LD A, ($COOO0) 
CP #00 

JP 2,$CO6F 
DEC A 

LD ($CO00),A 
DEC HL 

LD HL, (8COO1) 
DEC HL 


COBA 22 O1 CO LD ($COO1),HL 


‚; CO5D 3E 2E LD A,$2E 
‚s COSF 77 LD (HL),A 
‚.; CO60 3E 08 LD A,‚$08 
‚> CO62 CD AZ 00 CALL $00A2 
‚> CO65 3E 20 LD A,$20 
„56067 CD A2 00 CALL $OOAZ 
.; CO6A 3E 08 LD A,$08 
‚3 CO6C CD A2 00 CALL $00AZ 
.; CO6F C9 RET 
‚5 C070 FE 20 CP $20 
‚> CO72 DA CO OO JP C,$00C0 
‚5 CO75 FE 7E CP $7F 
.; CO77 DZ CO OO JP NC, $00CO 
„3 CO7Á F5 ‘PUSH AF 
‚+ COTB 34-00 GO LD A,‚($CO00) 
5 COTE PE 10 CP $10 
.) CO80 CA 93 CO JP 2,$CO93 
a CO83 SG ING A 
.; COB84 32 00 CO LD ($COO0),A 
3: CO87 ZA O1 CO LD HL, ($COO1) 
‚> COBA F1 POP AF 
dr CO8B: 7 LD (HL),A 
‚; CO8C 23 ING HL 

; CO8D 22 O1 CO LD ($COO1), HL 


Het enige dat u zelf hoeft te doen, is een CALL-opdracht naar INVOER te geven. 
Eerst doet de invoerroutine nog even een SETUP, waarin de invoerregel wordt 
gewist. De invoer heeft een maximumlengte van 16 tekens. Op het scherm wordt 
de invoerruimte voor de duidelijkheid gevuld met punten. De toetsenbordbuffer 
wordt geleegd en er wordt een invoer-prompt afgedrukt op de plaats waar de 
cursor zich op dat moment bevindt. 

INVOERO test op de CTRL/STOP-combinatie en probeert vervolgens een ka- 
rakter van het toetsenbord te halen. Het karakter dat werd opgehaald, vergelijken 
we met 13 (carriage return) om eventueel de subroutine te onderbreken. 

Geen 13, dus een ander karakter. Misschien wel ASCII-code 8 (backspace)? Zo ja, 
dan naar de DELETE-routine. Zo niet dan naar de ERBIJ-routine. | 


TIP: wijzig de stringlengte om wat variatie aan te brengen. De eerste ERBIJ-tests 
zorgen voor de juiste teken-acceptatie. Deze kunt u natuurlijk ook veranderen. 


Als voorbeeld noemen we CP $30 en CP $39 om alleen maar getallen door te laten. 
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CO90 
CO93 
CO94 
CO95 
CO98 
CO9B 
CO9E 
COAO 
COA 
COA3 
COA6 
COA9 
COAG 
COAF 
COB2 
COB5 
COB8 
COBB 
COBE 
COC1 
COC4 


i " Ĳ " = " Ë " = Ĳ - u . 1 i s - 
a ben dl n= ó he te á 
en hd al Se a ht On gut nn ng Rn ME nn et 


CJ 
F1 
Cg 
CD 
GD 
CD 
FE 
CB 
FE 
C2 
CD 
C3 
CD 
C3 
CD 
CD 
21 
CD 
21 
CD 
C3 


Toelichting 


ERBIJ kijkt of het teken is toegestaan. Zo niet dan keren we terug. Zo ja, dan 
controleren we nog even de lengte. Is de string te lang dan keren we terug. Als alles 
in orde is, plaatsen we dit teken even op de stapel om vervolgens de teller en de 
string-pointer te verhogen. Daarna halen we de waarde van de stapel af (OPGE- 


AZ 


2D 
BÀ 
8F 
OD 


08 
AC 
49 
AF 
70 
98 
BC 
95 
iE 
23 
03 
23 
B5 


O0 


CO 
00 
DO 


CO 
CO 
CO 
CO 
CO 
00 
CO 
CO 
CO 
GO 
CO 
CO 


JP $00A2 
POP AF 

RET 

CALL $CO2D 
CALL $00BA 
CALL $009F 
CP SOD 

RET Z 

CP $08 

JP NZ,$COAC 
CALL $CO49 
JP $COAF 
CALL $CO7O0 
JP $CO98 
CALL $00O6C 
CALL $C095 
LD HL,$COLE 
CALL $COZ3 
LD HL,$COO3 
CALL $CO23 
JP $COB5 


LET!) en plaatsen deze in de string. 


Als de invoerroutine is beëindigd, weet u waar de string zich bevindt. Ook weet u 
de lengte. Het is verder aan uw programma om deze invoer verder te verwerken. 


DELETE kijkt naar de lengte van de invoer. Is deze gelijk aan nul dan valt er niets 
te wissen en keert de routine terug. Is de invoerlengte ongelijk aan nul dan 
verlagen we de teller en de string-pointer, we plaatsen een punt in de string en de 


cursor moet terug naar voren. 
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10 De typemachinesimulatie 


Als u een printer tot uw beschikking heeft, kunt u eens kijken hoe u deze vanuit een 
machinetaalprogramma aanstuurt. Voor het gemak even een directe toets/prin- 
ter-schakeling. Het hangt van uw printer af hoe de codes worden verwerkt. 
Sommige printers wachten met uitvoeren totdat een CR (carriage return) wordt 
gesignaleerd, andere printers duwen alles meteen door de kop op het papier. 
Let vooral op de speciale uitzondering die wordt gemaakt voor een linefeed, en op 
de escape-uitsluiting. U kunt zelf beslissen of u een andere uitzondering wilt 
maken, of misschien wilt u juist wél gebruik maken van alle extra printer- 
mogelijkheden. In dit taatste geval verdient het enige aanbeveling om de handlei- 
ding van uw afdrukker eens netjes uit te spitten. 

TIP: bouw deze routine om naar een ‘string-afdrukker’ en u bent al aardig op weg 
naar een simpele tekstverwerker! Gebruik hiervoor bijvoorbeeld de afdrukrou- 
tine uit hoofdstuk 8. 


10000 ORIGIN ($c000) 

10010: == 

10020 $006c CONSTANT IniTxt 
10030 $OOSf CONSTANT ChGet 
10040 $00a2 CONSTANT ChPut 
10050 $00a5 CONSTANT LptOut 
10060 $00c) CONSTANT Beep 
10070 80156 CONSTANT KilBuf 
10030 == 

10090 $f3ae CONSTANT Lin40 
10100 == 

10110 CODE 

10129 == 

10130 :CharÖut 

10140 push af 

10150 call #ChPut 

10160 callì #LptOut 

10170 pop af 

10180 ret 

10190 == 

10200 :TypeMach 

10210 call #KilBuf 

10220 REPEAT 
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10230 
10240 
10250 
10260 
10270 
10280 
102390 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 


call #ChGet 
call #CharOut 


cp #13 
IF 2 
THEN 
Id a,#10 
call #CharOut 
push af 
call #Beep 
pop af 
F1 
cp #27 
UNTIL 2 
ret 
Latte 
Id a,#40 


Id (#Lin40),a 
call #IniTxt 
je #TypeMach 


10440 ENDCODE 


.: C000 F5 
: CO0O4 CD 
‚: COO0O8 C9 
se GOOS GD 
: CO10 OO 
‚… CO14 C2 
‘ CO18 OA 
me WGOLC BS 
.: CO20 F1 
.: COZ4 OC 
.: CO28 28 
see GOZG GD 
: CO30 O9 


.; CO00 F5 
.; COO1 CD 
> COO4 CD 
COOT F1 


.; COO9 CD 
; COOG CD 
COOF CD 
CO12 FE 


: CO08 C9 


CD AZ 00 nn 
AS OO BE eter 
SD 96 DL “lr 
IE OO CD rar 
CO FE OD “....” 
21-60 35 "alas 
ED 08 GO Vaer 
CD CO 00 

FE 1B CZ Ji 
CO C9 JE "aar 
32 AE ES “(2x 
oC OO GI Tadaa 


CO 52 45 “‚.RE 
PUSH AF 
AZ 00 CALL $00A2 
AB OO CALL $00A5 
POP AF 
RET 
56 O1 CALL $0156 
9F 00 CALL $OO9F 
00 CO CALL $COOO 
OD CP $OD 


CO14 C2 21 CO JP NZ,$CO21 


.; CO17 3E OA LD A,$0À 

‚ CO19 CD OO CO CALL $COOO 
.; CO1C FS PUSH AF 

we GOLID-CD- CO OO CALL $00CO0 
„5 6020 F1 POP AF 

‚; CO21 FE 1B CP $1B 

… CO23 GC OC LO JP NZ,$COOC 
‚3 6026 CI RET 

„sCO27. 35-28 LD A,$28 

., CO29 32 AE F3 LD ($F3AE),À 
.; CO2C CD 66 OO CALL $006C 
‚ CO2F C3 O9 GO JP $COOY9 
Toelichting 


Als u een goede MSX-printer bezit, kan er absoluut niets misgaan. Verder hangt 
het van uw eigen fantasie af hoe exotisch u de over te sturen codes wilt hebben. 


TYPEMACH initialiseert de keyboard-buffer en haalt een karakter met behulp 
van de BIOS-routine CHGET. Dit karakter wordt vervolgens meteen uitgevoerd 
met onze CHAROUT-subroutine. We PUSH-en de waarde, sturen het scherm en 
de printer (BIOS-LPTOUT) aan, waarna we de ingevoerde waarde POP-pen. 
Vervolgens kijken we of het om een carriage return (13) gaat, om er meteen nog 
even een linefeed achteraan te jagen (niet voor iedere printer noodzakelijk). Nog 
even een slinger aan de bel en als het om een escape-code ging, keren we terug naar 
ons hoofd-programma. Heel erg simpel allemaal! 


TIP: u kunt escape-codes toestaan om bijvoorbeeld over te gaan naar een andere 
karakterset, of om grafisch te printen. 
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11 Spelletje spelen? 


De joystick 1s als homecomputer-accessoire niet meer weg te denken. Tenslotte ís 
iedere huiscomputer ook een veredelde speelkameraad, vandaar deze joystick- 
routine. Erg handig is het feit dat u altijd meteen over de juiste joystick/cursor/ 
spatie-informatie kunt beschikken. Dit in tegenstelling tot het werken met de 
CHGET-routine, waar het gebruik afhankelijk is van de grootte van de toetsen- 
bordbuffer en/of de status van dat moment. 


TIP: een uitstekende mogelijkheid om uw programma op twee manieren van 
invoer te voorzien. Aan de ene kant de gewone CHGET-invoer en aan de andere 
kant een directe controle. Handig voor wachtlussen en/of onderbrekingen! 


10000 ORIGIN ($c000) 

10010- == 

10020 $006ec CONSTANT IniTxt 
10030 $00aZ2 CONSTANT ChPut 

10040 $00ba CONSTANT IscNtce 
10050 $OOd5 CONSTANT GtStcek 
10060 $0008 CONSTANT GtTrig 
LOOR: == 

10080 CODE 

10090 == 

10100 :Hoog .eh “stick omhoog” 
10110 ‚by HOa,td, $OO 
10120 :Laag .ch “stick omlaag” 
10130 ‚by $Oa,$Od, 500 
10140 ‘Links ‚ch “stick links” 
10150 „by $Oa,sOd, $00 
10160 :Rechts ch “stiek rechts” 
10170 : ‚by $0a,$Od, 500 
10180 ;:Vuur „eh “xx vuur XA 
10180 .by $0a,$0Od, 800 
10200 == 

10210 sPrint 

10220 td ash) 

10230 or a 

10240 retif z 

10250 call #ChPut 

10260 inc hl 
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10270 
10230 
10230 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10430 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 


10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 


Up 


jep #HPrint 


ld 
JE 


hl, #Hoog 
#Print 


: Down 


ld 
jP 


hl, tLaag 
#tPrint 


‘Left 


ld 
JP 


hl, #&Links 
#Print 


‘Right 


ld hì,#Rechts 
je HPrint 


‚Fire 


mm 


em 


ld hì,#&Vuur 
jp EPrint 


‘Joystick 


call #IscNte 
ld a,#0 

call #GtStek 
Id b,a 

cp Hi 

callif z,#Up 
ld a,b 

cp #5 

callif z,#Down 
Ìd a,b 

cp #J 

callif z,H#Left 
Id a,b 

cp #7 

callif z,#Right 
ld a, #0 

call RGtUTrig 
cp HEEL 

callif z,#Fire 
je HJoystick 


en 


Init 


call #IniTxt 
jp HJoystick 


10750 ENDCODE 
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COO0 


COO4 


CO08 


: COOC 


CO10 


\: CO14 


CO18 


CO1G 


CO20 


COZ4 


CO28 


CO2C 


CO30 


CO 34 


CO38 


CO3C 


CO40 


\: CO44 


CO48 


“ GO4C 


. ĳ - a * - a r á + 4 . É Ld ä « Fn - Li . - Ee - ĳ 
4 
nn en OE en Oe On Eg og EE a OE ng Ne ns 


le 
EN 


CO50 


CO4A 
CO4B 
CO4C 
CO4D 
COSO 
CO51 
CO54 
CO57 
COSA 
CO5D 
CO60 
CO63 
CO66 
CO69 
CO6C 
CO6F 
CO72 
CO75 
CO77 
COTA 
CO7B 
CO7D 
CO80 
CO81 
CO83 
C086 


53 
4B 
48 
OA 
54 
20 
41 
OD 
49 
4C 
53 
53 
4B 
43 
OA 
2Â 
59 
2Â 
OD 
C8 
23 


7E 
B7 
C8 
CD 
23 
C3 
21 
C3 
2d 
C3 
21 
C3 
21 
C3 
21 
C3 
CD 
3E 
CD 
47 
FE 
CC 
78 
FE 
CG 
78 


54 
20 
4E 
OD 
49 
4F 
41 
00 
43 
49 
OA 
54 
20 
48 
OD 
2A 
55 
ZA 
OO 
CD 
C3 


Â2 


AA 
00 
4ÀA 
OF 
4A 
iE 
AA 
2C 
4A 
3B 
4A 
BÀ 
00 
D5 


O1 
54 


05 
SÂÄ 


49 
4E 
4F 
00 
43 
4D 
47 
53 
4B 
4E 
OD 
49 
52 
54 
00 
20 
52 
2Â 
TE 
A2 
4 A 


00 


CO 
CO 
CO 
CO 
CO 
CO 
CO 
CO 
CO 
CO 
CO 
OÛ 


0Û 


CO 


CO 


43 
AD 
47 
oJ 
4B 
4 
OA 
54 
20 
AB 
O0 
43 
45 
53 
2A 
56 
20 
OA 
B7 
00 
GO 


serie ze GODE el 00 GO GI "Bs 
"K OM” ‚: CO58 4A CO Zi OF “J.t. 


Ï 
“HOOG " .: CO5C CO C3 4A CO "..J." 
Re ‚: CO60 21 1E CO C3 PL...” 
“TICK" .: CO64 4A CO 21 26 “J.L," 
"_OML" .: CO68 CO C3 4A CO "..J." 
"AAG." ve COB ZE SB 60 GC "Kist 
seh .: CO70 4A CO CD BA “JJ...” 
"ICK ” ‚: CO74 00 3E 00 GD “"‚>..” 
“LINK” .: CO78 D5 00 47 FE "..G.” 
Oee. .: GO7C O1 CC 54 CO “..T.' 
"STIG" .: CO80 78 FE 05 CC Nik 
"K RE” .: CO84 BA CO 78 FE "Z.x.” 
VGHTS .: CO88 03 CC 60 CO "..*.” 
Tm ‚: CO8C 78 FE 07 G6 "x...” 
"kek VS .: COÔS90 66 CO 3E O0 "f.>.” 
“UUR 7 .: CO94 CD D8 00 FE * 7 


nk, .: CO88 FF CC 66 CO “"..}.” 
ED .: CO9C C3 72 CO CD ".r..” 
etl „… GOAOD BL DO CI 72 LE. 
E.J. .: COA4 CO FO O0 21 “...l" 


LD A, (HL) 
OR A 

RET 2 

CALL $OOAZ 
ING HL 

JP $CO4A 

LD HL, $COO00 
JP $CO4A 

LD HL, $COOF 
JP $CO4A 

LD HL, S$COIE 
JP $CO4A 

LD HL, $CO2C 
JP $CO4A 

LD HL,$CO3B 
JP $CO4A 
CALL SOOBA 
LD A,‚$00 
CALL SOODS5 
LD B,A 

CP $01 

CALL Z,8CO54 
LD A,B 

CP $05 

CALL Z,5COS5A 
LD A,B 


a 


CO087 FE 03 CP $03 


.; CO89 CC 50 CO CALL Z,$CO60 
.; CO8C 78 LD A,B 
‚; COB8D FE 07 CP $07 

.;‚ CO8F CC 66 CO CALL Z,$CO66 
.; CO92 3E OO LD A,‚$00 

.s CO94 CD D8 OO CALL $00D8 
‚; CO97 FE FF CP SFF 

„5 CO99 GC 6G CO CALL 4,$CO6G 
4 GII GI: FZ 60 JP $CO72 

„5 CO9F CD 6C 00 CALL $006C 

; COAZ C3 72 CO JP $CO72 
Toelichting 


We maken gebruik van de BIOS-routine GTSTCK. Deze kunt u aanroepen met 0 
(keyboard), 1 Goystick A), of 2 (joystick B) in de accumulator. Voor de vuurknop 
gebruiken we BIOS-GTTRIG met identieke waarden in de accumulator. 


De JOYSTICK-routine kijkt naar CTRL/STOP, om vervolgens de joystick- 
waarde uit te lezen. Deze waarde redden we door hem in het B-register te zetten. 
Hierna is het een kwestie van vergelijken en, afhankelijk van de waarde, een 
passende tekst afdrukken (met de reeds bekende print-routine). 

We halen de vuurknopwaarde op (0 = niets / 255 of SFF = vuur) en drukken af 
als er inderdaad wordt ‘geschoten’. 


Het uitlezen van een joystick heeft normaliter alleen maar met het spelen van 
spelletjes te maken. Spelbesturing is vaak erg complex, dus in dergelijke gevallen 
hangt het van de grenzeloze fantasie van de programmeur af of er met de invoer 
ook daadwerkelijk iets wordt gedaan. Het blijft altijd handig om van een test zoals 
in dit voorbeeld gebruik te maken. U simuleert dan een CASE-structuur en dat is 
wel zo praktisch. 
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12 Bitbeschouwingen 


Het geheugen van uw MSX-machine staat in feite boordevol getallen. In bytes (8 
bits) gezien, spreken we over waarden tussen 0 en 255, in words (16 bits) over 
getallen tussen 0 en 65535. Maar nog altijd decimaal! 

Een schrijfwijze die beter aansluit op de flip/flop-situatie in uw MSX-computer is 
de binaire notatie: allemaal nullen en enen. U kunt dan ook veel sneller aflezen hoe 
het is afgelopen met die vreemde bitbewerkingen. 

De bijbehorende subroutine demonstreert hoe u binaire waarden op uw scherm 
krijgt afgedrukt. Dit alles kan op twee manieren en met een binair ‘procentje’ 
ervoor. Een byte-waarde of een word-waarde, u plaatst het getal op een zelfgeko- 
zen adres, u springt naar de juiste routine en voilà! 


TIP: gebruik deze routine zolang uw programma’s zich nog in hun testfase 
bevinden. Ten eerste ziet u óf er wat gebeurt en ten tweede weet u hóe het gebeurt. 


10000 ORIGIN ($ec000) 
19019 == 

10020 $00a? CONSTANT ChPut 
10030 $00d8 CONSTANT GtTrig 
10040 —- 

10050 CODE 

10060 —- 

10070 :Byt .by #00 
10080 :Word ‚wo $0000 
10090 -- 

10100 :Procent 

10110 ld a,#37 

10120 jep #ChPut 
10130 == 

10140 :NewLin 

20150 ld a,#10 

10160 call #ChPut 
10170 ld a,#13 

10180 je #ChPut 
10190 -- 

10200 :Binair 

10210 ld (#Byt),a 
10220 ld b‚#128 
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10230 
10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10690 
19700 
10710 
10720 
10730 
10740 


REPEAT 
ld a, (#Byt) 
and b 
IF z 
THEN 


id a,#43 


ELSE 


ld a,#49 


Fi 
call #ChPut 
srl b 

UNTIL z 

ret 


:DoByt 


en 


call #Procent 
ld a, (#Byt) 
call #Binair 
je HNewLin 


DoWord 


call #Procent 
ld a, (#Word+t1) 
call #Binair 
ld a, {(#Word) 
call #Binair 
jep #HNewLin 


: Pauze 


ld a, #0 

call #GtTrig 
cp #HSfÉF 

jpif z,tPauze 
ret 


Init 


ld a,#0 
ld (#Byt),a 
REPEAT 
call #Pauze 
call #DoByt 
ld a, (#Byt) 
inc a 
ld (#Byt),a 
UNTIL z 
ld a,#0 
ld (#Word),a 
ld (#Word+t1),a 
REPEAT 
call #Pauze 
call #DoWord 
ld a, (#Word) 
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10750 
10760 
10770 
10780 
10790 
10800 
10810 


10820 -- 


10330 ENDCODE 


se GOOG 
re COO4 
:; COO8 
«…-GO0OC 
2 GO 10 
.: GO14 
1e. GOLB 
: CO1C 
„: CO020 
.: COZ4 
.: CO028 
: COZC 
„26030 
…t GO34 
.: CO38 
: CO3C 
‚: CO40 
: CO44 


se GO03 
si COOS 
‚ CO08 
.; COOA 
s COOD 
se COOH 
5 CO1L2 
GOES 
GOL 
.; CO1A 
‚ CO1B 
zn GOT 
6020 
…r 6G023 
ss G025 
; CO28 


00 
25 
3E 
00 
A2 
CO 
00 
23 
C3 
31 
CB 
CO 
CO 
CD 
08 
CO 
CD 
Ol 


3E 
C3 
3E 
CD 
JE 
CJ 
32 
O6 
JA 
AQ 
C2 
3E 


3E 
CD 
CB 


inc a 
ld (#Word),a 

ld a, (#Word+t1) 
deg a 
ld (#Word+1),a 
UNTIL 2 
ret 


00 
C3 
OA 
3E 
00 
06 
CO 
GO 
25 
CD 
38 
C9 
JA 
12 
CO 
3Â 
12 
eit 


25 
A2 
OA 
Az 
OD 
Al 
0Û 
80 
00 


23 
30 


31 
AZ 
38 


00 
A2 
CD 
OD 
2 
80 
AQ 
3E 
CO 
AZ 
C2 
CD 
00 
CO 
CD 
O2 
CO 
CD 


O0 
00 


00 
CO 


CO 
CO 
CO 


00 


3E 
00 
AZ 
C3 
00 
JA 
C2 
30 
3E 
O0 
17 
03 
CO 
C3 
03 
CO 
3Â 
EZ 


LD Á,$25 

JP $00AZ 

LD A,$0Â 
CALL $OOARZ 
LD A,$0D 

JP $00A2 

LD ($COO0),A 
LD B, $80 

LD A, ($COOO) 
AND B 

JP NZ,8C0293 
LD A,$30 

JP $C025 

LD A,$31 
CALL SO00AZ 
SRL B 


CO48 


CO4AC 


CO50 


“: CO54 


C058 


CO5C 


CO60 


CO64 


CO068 


_CO6C 


CO70 


CO74 


CO78 


CO7C 


CO80 


: CO84 


C088 


CO 
3E 
00 
AC 
00 
GD 
2E 
CO 
CO 


CO 
CD 
3À 
CO 
CO 
3D 
C2 


C3 
O0 
FE 
GO 
3e 
4C 
CO 
36 
CZ 


32 
4C 
GO 
3G 
JA 
32 
74 


08 
CD 
FF 
C9 
00 
CO 
JÂ 
32 
5C 
32 
02 
GO 
SA 
3ë 
02 
O2 
CO 


CO 
D8 
CA 
3E 
CO 
CD 
00 
00 
CO 
Oi 
CO 
CD 
01 
O1 
CO 


C9 


CO2A C2 17 CO JP NZ,$CO17 


.; Co2D CS RET 

ss GO2E CD 03 CO CALL $COO3 
.… CO31 3A OO CO LD A, ($COOO) 
.; CO34 CD 12 CO CALL #CO12 
ze OST C3-08- CO JP $CO08 

.: CO3A CD 03 CO CALL $&COO3 
.: CO3D 3A 02 CO LD A, ($CO02) 
„5 CO40 CD 12 CO CALL $CO12 
.; CO43 3Â O1 CO LD A,‚($COOI) 
., CO46 CD 12 CO CALL $CO12 
.; CO49 C3 OB CO JP $COOB 

.; CO4C 3E 00 LD A,‚$00 

.; CO4E CD D8 OO CALL $0OD8 
.; CO51 FE FF CP $EF 
.; CO53 CA 4C CO JP Z,$CO4G 
.; CO56 C9 RET 

‚; CO57 3E 00 LD A,‚500 

5 GOS 32 00 CO LD ($COO0),A 
s, COC CD 4C CO CALL $CO4C 
‚; COSF CD 2E CO CALL $CO2E 
.; CO62 3A OO CO LD A, ($CO00) 
„; CO65 3C INC A 

; CO6B 32 00 CO LD ($COO00),A 
zs CO6I C2 56 CO JP NA, 8CO5C 
‚3 COS6C 3E 00 LD A,$00 

‚; COBE 32 O1 CO LD ($CO0O1),A 
zo GOT 32 02 GO LD ($COO2),A 
… CO74 CD 4C CO CALL $CO4C 
.; CO077 CD 3A CO CALL $CO3A 
.) CO7/A 3A O1 CO LD A‚($COO1) 
sa GOLD BE INC A 

.; CO7E 32 O1 CO LD ($COO1),A 
.‚ CO81 3A 02 CO LD A,‚($COO2) 
„5 CO34 3D DEC A 

„… G085 32 02--C0 LD ($CO0O2),A 
.; CO88 G2 74 CO JP N4A,$C074 
‚3 CO8B C9 RET 

Toelichting 


Het wordt nu toch wat minder makkelijk, dus laten we de listing eens puntsgewijs 
van boven naar beneden bekijken. U zult dan zien dat de feitelijke routine niet 
zoveel in huis heeft. 
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PROCENT vertelt de gebruiker door middel van een %-teken dat het om een 
binair getal gaat. 


NEWLIN geeft een linefeed en een carriage return (zie appendix voor exacte 
werking). 


BINAIR redt de af te drukken accumulator. In het B-register wordt 128 
(®%100000000) geplaatst. Vervolgens gaan we dit B-register als masker voor het af 
te drukken byte gebruiken. Eerst een AND met % 10000000, een gesette zero-flag 
heeft tot gevolg dat we een 1 afdrukken, anders een 0. Het B-register wordt naar 
rechts geschoven (% 10000000 wordt %01000000.…) en we herhalen de afdruk- 
test. Schuiven, afdrukken enz. Dit alles acht keer, waarna we terugkeren. 


DOBYT drukt een byte af en verplaatst de cursor naar een nieuwe regel (De 
CALL-return wordt verderop meegenomen). 


DOWORD drukt een word af. Eerst het high-byte, dan het low-byte. 


PAUZE kijkt of er op de spatiebalk wordt gedrukt. Is dat het geval dan wacht de 
routine totdat de spatiebalk weer wordt losgelaten. 


INIT drukt ter demonstratie 255 bytes en 255 words af. 
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13 Hexadecimale sprongen 


De getalsnotatie die in computerland het meest wordt gebruikt, is zonder twijfel 
de hexadecimale vorm. Niet alleen is deze het best leesbaar (toegegeven, het is even 
wennen), het is ook de meest compacte manier om een getal te representeren. 
Waar een binaire byte-uitvoer acht maal naar de CHPUT zal grijpen, hoeft de 
hexadecimale variant slechts twee keer te scoren. Ziedaar de ruimte- en tijdwinst! 
Net als bij de voorgaande binaire routine roept u ook deze routine op twee 
manieren aan. Een byte-afdruk en een word-afdruk. 


TIP: een prima routine voor een hexadecimale memory-dump! In combinatie met 
een invoermogelijkheid simuleert u de SpeedTyper. 


10000 
10010 
10020 


ORIGIN ($c000) 


$00aZ CONSTANT ChPut 


10030 $00d8 CONSTANT GtTrig 
10040 —- 

10050 CODE 

10060 -—- 

10070 :Byt .by #00 
10080 :Word ‚wo $0000 
10090 -- 

10100 :Hexlod .ech “0123456789Jabcedef ” 
tOLL0 == 

10120 :String 

10130 ld a,#36 

10140 jp #ChPut 
10150 == 

10160 :NewLin 

10170 ld a,#10 

10180 calì #ChPut 
10190 ld a,#13 

10200 jp #ChPut 
1O2L0 == 

10220 :MakNib 

10230 Id hì,#HexCod 
10240 ld c‚a 

10250 ld b,#0 

10250 add hìl,be 
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10270 
10230 
10230 
10300 
10310 
10320 
10330 
10340 
10350 
10350 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10450 
10430 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
105620 
10630 
10640 
105650 
10660 
10670 
10630 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 


O2 


la a; CAL) 
je #ChPut 


:MakByt 


push af 

srl a 

srl a 

srì a 

srl a 

call #MakNib 
pop af 

and #15 

jp HMakNib 


: DoByt 


__ 


__ 


call Hetring 
ld a, (#Byt) 
call #MakByt 
jp HNewLin 


:DoWord 


call #5tring 
id a, (#Wordt1) 
call #MakByt 
ld a, (#Word) 
call #MakByt 
jp HNewLin 


‚Pauze 


ld a,#0 

call #GtTrig 
cp HEEE 

jpif z,H#Pauze 
ret 


SELL 


ld a,#0 
ld (#Byt),a 
REPEAT 
call #Pauze 
call #DoEyt 
ld a, (#Byt) 
inc a 
ld (#Byt),a 
UNTIL az 
id a,#0 
Id (#Word),a 
ld (#Word+1),a 
REPEAT 
call #Pauze 
call #DoWord 


10780 Id a, (#Word) 


10790 inc a 

10800 ld (#Word),a 
10810 ìld a, (#Word+1) 
10820 dec a 

10830 ld (#Word+1),a 


10840 UNTIL z 
10850 ret 
10300. :== 

10870 ENDCODE 


„rG008 00 060 00 A0 0 ce COSO 60 CD 2D 00 Gom 

.: CO04 31 32 33 34 "1234" .: CO54 3A O1 CO CD ":,.." 
.: CO08 35 36 37 38 "5678" ‚… CO58 2D CO C3 18 *-,..* 
: COOC 39 41 42 43 "JABC" ‚: CO5C CO 3E OO CD "‚>,." 
.: CO10 44 45 46 3E “DEE>" .: CO60 D8 00 FE FF ",...* 

‚… CO14 24 C3 A2 00 “E.," ‚: GO64 CA 5D CO CI "‚J.r 
ze 018 3E OA CD A2 "mos" .: CO68 3E 00 32 00 "5,2 
GO EG O0- Ji OD O3 Th .: CO6C CO ED 5D CO eg 
„… CO20 A2 OO 21 DA “sl .: CO70 CD 3F CO 3A Ree 
: COZ24 CO 4F 06 00 “".O,." .…: C074 00 CO 3C 32 "2e 
sGO2Z8 09 TE C3-AB: Thon .: CO78 00 CO C2 8D "mm" 
nh GO20 OO F5 OB JE “rt .: CO7C CO 3E 00 32 ">, 9r 
: CO30 CB 3F CB 3F "“.?.2?" ‚…C080 Ol CO 32 Q2- “a 
: CO34 CB 3E CD 22 ".7,‚"" .: CO84 CO CD 5D CO ede 
se GOS CO EL EG OE Ponsa .: CO88 CD 4B CO 3A "‚K.:" 
ze USC GS 22-60 CD aan” .: COBC O1 CO 3C 32 "2" 
. CO40 13 CO 3A 00 "..:." .… CO90 O1 CO JA 02 ":.* 
.: CO44 CO CD 2D CO ".,-,” .: CO94 CO 3D 32 02 "zg" 
‚s CO4 O3 18-G0 CD Pre” …s COB CO CP 85 CO 
„0O4G 13 60 -3A O2 Pi .: COC CI OQ FE OD " 

‚ CO13 3E 24 LD A,$24 

‚s CO15 CI A2 00 JP $00A2 

.; CO18 3E OA LD A‚$0A 

‚> COIA CD A2 OO CALL $00A2 

ss COLD JE -OD LD A‚,$0D 

‚; COIF C3 A2 OO JP $00AZ 

… CO22 21 03 CO LD HL, $CO03 

zr GOZ5 AF ED GA 

> CO26 O6 OO LD B, $00 

.; CO238 O9 ADD HL,BC 

‚; COZJ9 7E LD A, (HL) 

., COZA C3 A2 OQ JP $00A2 

aa OAD F5 PUSH AF 

„sn G0O2E CB 3E SRL A 
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CO 30 
CO32 
CO34 
CO36 
CO39 
CO3À 
CO3C 
CO3F 
CO42 
CO45 
CO483 
CO4B 
CO4E 
CO51 
CO54 
CO57 
COSA 
COSD 
COSF 
CO62 
CO64 
CO6T7 
CO68 
CO5A 
CO6D 
CO7O 
CO73 
CO76 
CO77 
COTTA 
COTD 
COTE 
CO82 
CO85 
CO88 
COBB 
CO8E 
CO8P 
CO92 
CO95 
CO96 
CO99 
CO9C 


- = 4 " de - + Ek È : » = . à . a = u . m * . - . . « . 1 « n : « - s D De n ä n E DS 
wen OE OS ng en ng en nn gn ee nn ee gn en ee an en ME nn U er OE ee gr Oe en en an OM ne gn ee gn et gn ee 


CB 
CB 
CB 
CD 
F1 
E6 
C3 


3Â 
CD 
C3 
CD 
3Â 
CD 
3Â 
CD 
C3 
3E 
CD 
FE 
CA 
C9 
3E 
32 
CD 
CD 
JA 
30 
32 
C2 
3E 
92 
3 
CD 
CD 
3Â 
3C 
32 
SA 
3D 
32 
C2 
C9 


Toelichting 


Deze routine is nog iets ingewikkelder dan de vorige, aangezien we ieder byte in 
tweeën moeten splitsen (vier bits leveren een waarde tussen %0000 en %llll, 
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3E 
SF 
SF 
22 


OF 
2 
13 
00 
2D 
18 
13 
02 
2D 
O1 
2D 
18 
00 
D8 
FE 
5D 


00 
OO 
5D 
3E 
00 


00 
6D 
00 
O1 
O2 
5D 
4D 
O1 


Oa 
02 


02 
85 


CÔ 


CO 
CO 
CO 
CO 
CO 
CO 
CO 
GO 
CO 
CO 
CO 


OO 
CO 


CO 
CO 
CO 
CO 


CO 
CO 


CO 
CO 
CO 
CO 
CO 


CO 
CO 


CO 
CO 


SRL Á 

SRL A 

SRL À 

CALL $CO22 
POP AF 

AND SOF 

JP $CO22 
CALL $CO13 
LD A, ($CO0O) 
CALL $CO2D 
JP $CO18 
CALL $CO13 
LD A‚($CO02) 
CALL $CO2D 
LD A‚($CO01) 
CALL $COZD 
JP $CO18 

LD A,‚$00 
CALL $O0D8 
CP SEF 

JP Z,$COSD 
RET 

LD A,$00 

LD ($COOO),A 
CALL $COSD 
CALL $CO3F 
LD A, ($CO00) 
INC A 

LD ($COOO0),A 
JP NZ, $CO6D 
LD A,$00 

LD ($COO1),A 
LD ($CO02),A 
CALL $COS5D 
CALL $COAB 
LD A,‚($COO1) 
INC A 

LD ($COO1),A 
LD A, ($CO02) 
DEC A 

LD ($COO2),A 
JP N4,$C085 
RET 


tussen $0 en $F, of tussen #0 en #15 op)en via een tabel moeten afdrukken. We 
bekijken de listing wederom puntsgewijs. Vooral MAK NIB en MAKBYT verdie- 
nen uw gewaardeerde aandacht. 


STRING vertelt de gebruiker door middel van een $-teken dat hij met een 
hexadecimaal getal te maken heeft. 


NEWLIN geeft een linefeed en een carriage return. 


MAK NIB plaatst het adres van de string HEXCOD in het HL-registerpaar. de 
inhoud van de accumulator (een waarde tussen 0 en 15) komt in het C-register en 
er komt een nul in het B-register. Vervolgens tellen we de registerparen HL en BC 
bij elkaar op, waarna we de HL-geadresseerde waarde afdrukken. 


MAKBYT splitst het af te drukken byte in tweeën. Eerst het high-nybble. 
Daartoe schuiven we het byte vier maal naar rechts met als gevolg dat de zaak 
verschuift van ‘aaaabbbb’ naar ‘0000aaaa’. Met deze laatste waarde duiken we de 
MAK NIB-routine in. 

Het low-nybble verkrijgen we met een AND-instructie. ‘aaaabbbb’ is na deze 
instructie omgetoverd in ‘0000bbbb’. Ook nu weer naar MAK.NIB. 


DOBYT drukt een byte af en verplaatst de cursor naar een nieuwe regel. 


DOWORD drukt een word af. Eerst het high-byte, dan het low-byte. 
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14 Ongewoon gewoon! 


Decimale getallen zien er zo bekend uit! Omdat ‘gewone’ computergebruikers zich 
niet willen pijnigen over het hoe en waarom van hexadecimale getallen, wordt van 
de programmeur verwacht dat hij of zij zich omschakelt. Decimale getallen op een 
computer is zoiets als eieren in een magnetron: het gaat wel, maar niet écht lekker! 
Geen nood, want een beetje programmeur serveert iedereen op maat, zelfs de leek. 
Evenals bij de twee voorgaande gevallen duiken we een subroutine in, maar er 
moet vooraf nog even wat gebeuren! U moet namelijk aangeven hoe ‘breed’ het 
getal gaat worden. 00000, 0000, 000, 00, of 0? Enfin, kijkt u maar naar het 
voorbeeld. 


TIP: als u de werking van deze routine bijna letterlijk omdraait, kunt u in 
combinatie met de invoeroptie ook decimale getallen inlezen. 


10000 ORIGIN ($c000) 
KOOTO == 

10020 $00a2 CONSTANT ChPut 
10030 $00d8 CONSTANT GtIrig 


10040 -- 

10050 CODE 

10980 == 

10070 :Byt .by $00 
10080 :Word ‚wo $0000 
10090 -- 

10100 :DecTab .wo 10000 
10110 ‚wo 1000 
10120 .wo 100 
10130 ‚wo 10 
10140 wo Ì 
10150 -— 


10160 :Hekje 

10170 ld a,#35 
10180 iep #ChPut 
10190 —- 

10200 :NewLin 

10210 ld a,#10 
10220 call #ChPut 
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10230 
10240 
10250 
10260 
10270 
10280 
102390 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10330 
10400 
10410 
10420 
10430 
10440 
10450 
10450 
10470 
10430 
10430 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
1C600 
19610 
10620 
10630 
10640 
10650 
19660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 


Id a,#13 
jep #ChPut 


‘Decimaal 


ee 


REPEAT 
push af 
Ìd a, {be} 
Id e‚,a 
inc be 
ld a,{({be} 
ld d‚a 
inc bc 
ld a,#EffÉ 
or a 
push be 
REPEAT 
ld b‚k 
ld el 
sbc hl,de 
inc aäa 
UNTIL cs 
ld h‚b 
ie Mn Te. 
pop be 
add a,#48 
call #ChPut 
pop af 
dec a 
UNTIL z 
ret 


:DoByt 


call #Hekje 

Id h,#0 

Id a, (#Byt) 

ld la 

ld be, tDecTab+4 
Ìd a, #3 

call #HDecimaal 
jep HNewLin 


 DoWord 


calì HHekje 

ld a, {(#Word+1) 
Id h‚a 

ld a, (#Word) 
ld Ìl,a 

ld be, #DecTab 
ld a,#5 

call #Decimaal 
jp #NewLin 


Di 


10750 
10760 
10770 
10780 
10790 
30300 
10810 
10820 
10830 
10840 
10850 
10850 
10870 
10880 
10890 
10900 
10910 
10920 
10830 
10340 
10950 
10960 
10870 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 


: Pauze 


ld a, #0 

call #GtTrig 
cp HEEF 

jrif z,#Pauze 
ret 


‘Init 


ld a,H#0 
ld (#Byt),a 
REPEAT 
call #Pausze 
call #DoByt 
ld a, (#Byt) 
inc a 
ld (#Byt),a 
UNTIL z 
ld a,#0 
ld (HWord),a 
id (#Wordti),a 
REPEAT 
call #Pauze 
call #DoWord 
ld a, (#Word) 
inc aä 
id (#Word),a 
id a, (#Word+1) 
dec a 
ld (#Word+1),a 
UNTIL z 
ret 
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11070 ENDCODE 


: COOO 
COO4 

: COO08 
se GOE 
: CO10 
„GOA 
: CO18 
CO1C 
 GUZ0 
.: CO24 
: CO28 
CO2C 

oe COD 
: CO34 
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00 
27 
00 
00 
A2 
CD 
OD 
F5 
OA 
FF 
AD 
D2 
69 
CD 


00 
Eö 
OA 
3E 
00 
A2 
C3 
OA 
57 
B 
ED 
27 
C1 
A2 


O0 
03 
00 
23 
3E 
00 
A2 
SF 
03 
C5 
52 
CO 
C6 
OO 


10 
64 
O1 
C3 
OA 
3E 
00 
03 
3E 
44 
JG 
60 
30 
Fi 


CO38 


: CO3C 


CO40 


CO4A4 


CO48 


CO4C 


COSO 


CO54 


CO58 


COSC 


CO60 


CO64 


C068 


CO6C 


3D 
C9 
26 
CO 
CO 
1G 
CO 
3Á 
JA 
O1 
05 
C3 
O0 
FE 


C2 
CD 
00 
6E 
3E 
CO 
CD 
O2 
O1 
03 
CD 
1ë 
CD 
EF 


1G 
OD 
3À 
Ol 
03 
G3 
OD 
CO 
CO 
CO 
1C 
CO 
D8 
CA 


CO 
CO 
OO 
07 
CD 
Ez 
CO 
67 
6F 
3E 
CO 
3E 
DO 
67 


OOR De 


- €070 


CO74 


. CO78 
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CO7G 
CO80 


“: CO84 
‚ CO88 


COOO 
COO1 
COO2 
CO03 
COOS 
CO06 
COOT 
C008 
COO9 
COOA 
COOB 
COOE 
COOF 
CO12 
CO14 
CO17 
CO19 
CO1C 
CO1D 
COIE 
CO1F 
CO20 
CO21 
COZ2 
CO23 
CO25 
CO26 
CO27 
CO28 
COZ9 
COZB 
CO26 
Co2r 
CO 30 
CO31 
CO32 
CO34 
CO37 
CO38 
CO39 
CO3C 


CO 
32 
67 
CO 
3C 
C2 
00 


00 
00 
00 
10 
E8 
03 
64 
00 
OA 
0Û 
01 
23 


3E 
CD 
3E 
C3 
F5 
OA 
5E 
03 
OA 
57 
03 
SE 
B7 
C5 
44 
AD 
ED 
3C 
Dz 
60 
69 
Cl 
C6 
CD 
F1 
3D 
C2 
C9 


C9 
00 
CO 
JA 
32 
Tt 
3 


df 


00 
A2 
OA 
AZ 


OD 
Â2 


FE 


md 


27 


30 
A2 


iC 


3E, 
CO 
CD 
00 
00 
GO 
01 


JE 
00 
00 
00 


CÔ 


00 


CO 


00 
CD 
3D 
CO 
CO 
3E 
CO 


ET 4 CO8C 32 02 CO ED Zon 

PN .: CO90 67 CO CD 51l “"g..Q' 
"gg... .: CO94 CO 3A O1 CO ".:.. 
Send ‚2 CO93 3C 32 04 CO "EA 
Senn, .: CO9C 3A O2 CO 3D ":z..=" 
Gea „0 :C0A0- 32 02 CO G4 “Zas 
Tus .: COA4 8E CO C9 43 “‚..I” 


NOP 

NOP 

NOP 

DJNZ @CO2G 
RET PE 

INC BC 

LD H‚H 

NOP 

LD A, (BC) 
NOP 

LD BC, $3E00 
INC HL 

JP $00AZ 
LD A,$0A 
CALL $OOAZ 
LD A,$0D 
JP $OOAZ 
PUSH AF 

LD A, (BC) 
LD B,A 

INC BO 

LD A, (BC) 
ED DA 

INC BG 

LD A, SFF 
OR À 

PUSH BO 

ED BH 

LD C,L 

SBC HL,DE 
INC A 

JP NC, $CO27 
LD H,‚B 

LD L,‚6 

POP BG 

ADD A,‚$30 
CALL $00AZ 
POP AF 

DEC A 

JP NZ,$COICG 
RET 
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CO3D 
CO40 
CO42 
CO45 
CO46 
CO49 
CO4B 
CO4E 
COSÌ 
CO54 
CO57 
CO58 
COSB 
COSC 
COBF 
CO61 
CO64 
CO67 
CO69 
CO6C 
COBE 
CO71 
CO72 
COT74 
CO77 
COT A 
CO7D 
CO80 
CO81 
CO84 
CO87 
CO89 
CO8C 
CO8F 
CO92 
CO95 
CO98 
CO99 
CO9G 
COSF 
COAO 
COA3 
COA6 
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Toelichting 


OD 
00 
00 


07 
03 
1C 
12 
OD 
02 


O1 


03 
05 
1C 
12 
OO 
D8 


67 


OO 
00 
67 
3D 
00 


00 
tT 
00 
O1 
02 
67 
Dd 
Ol 


Ol 
Oz 


O2 
8E 


CO 
CO 
CO 


CO 
CO 
CO 
CO 


CO 
CO 


CO 
CO 


Co 
CO 


CO 
CO 
CQ 
CO 


CO 
CO 


CO 
CÔ 
CO 
CO 
CO 


CO 
CO 


CO 
CO 


CALL SCOOD 
LD H,‚$00 

LD A, ($CO00) 
LD L‚Â 

LD BC, 5COOT7 
LD A,$03 
CALL &CO1C 
JP #$CO12 
CALL SCOOD 
LD A, ($CO02) 
LD H,‚A 

LD A, ($COO1) 
LD L,‚ÀA 

LD BC,$COO3 
LD A,$05 
CALL $COIC 
JP $CO12 

LD A,$00 
CALL $00D6 
CP SFF 

JP Z,$C067 
RET 

LD A,$00 

LD ($COOO),A 
CALL $CO67 
CALL $CO3D 
LD A,‚($CO00) 
INC A 

LD ($CO00),A 
JP NZ,$CO77 
LD A,‚$00 

LD ($COO1), A 
LD ($COO2),A 
CALL $CO67 
CALL $CO51 
LD A,‚($COO1) 
ING A 

LD ($COO1),A 
LD A, ($CO02) 
DEC A 

LD ($COO2),A 
JP NZ,$CO8F 
RET 


Decimaal afdrukken werkt, vanuit de computer gezien, nogal ongelukkig zoals u 
inmiddels heeft vernomen. We moeten met machten van tien rekenen, met als 
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gevolg dat we in een minder gecontroleerde lus komen. In dit geval kost het dan 
ook MEER tijd om een GROTER getal af te drukken, Waarschijnlijk is dit voor u 
geen enkel probleem, maar in kritische gevallen is het toch erg onhandig. 

We bekijken de listing weer eens puntsgewijs. DECIMAAL, DOBYT en DO- 
WORD verdienen uw aandacht! Let trouwens ook op het werken met die DEC- 
TAB-word-tabel, een dergelijke adressering heeft u ook nodig als u externe invoer 
wilt omzetten naar een later te verwerken waarde. 


HEKJE vertelt ons door middel van een #-teken dat we met een decimaal getal te 
maken hebben. 


NEWLIN geeft een linefeed en een carriage return. 


DECIMAAL zet een waarde (byte of word) om in een leesbare output. Eerst halen 
we via via een DECTAB-waarde in het DE-registerpaar. Met die OR A zorgen we 
voor een juiste SBC-ingang (Laat die OR A maar eens weg! Ziet u wel.…) Nu 
verminderen we onze waarde net zolang met de inhoud van het DE-registerpaar 
totdat het fout dreigt te gaan. In dat geval hebben we een nog net juiste waarde in 
het BC-registerpaar staan en die bewaren we dan ook voor het volgende DEC- 
TAB-getal. 

Om te zorgen dat we een cijfer op het scherm krijgen, tellen we 48 bij de 
accumulator op (zie appendix B voor het hoe en waarom.) en drukken we die 
waarde af. 

Dit alles opnieuw, totdat de teller op nul staat. Dit heeft als gevolg dat we weer 
terugkeren. 


DOBYT drukt een byte af via het HL-registerpaar en verplaatst de cursor naar 
nieuwe regel. Let op het instellen van de DECIMAAL-routine (Lengte is drie: 
100, 10 en 1). 


DOWORD drukt een word af via het HL-registerpaar en verplaatst de cursor 
naar een nieuwe regel. Let ook hier op het instellen van de DECIMAAL-routine 


(Lengte is vijf: 10000, 1000, 100, 10 en 1). 


PAUZE kijkt of er op de spatiebalk wordt gedrukt. Als dat het geval is, wacht de 
routine totdat de spatiebalk wordt losgelaten. 


INIT drukt ter demonstratie 255 bytes en 255 words af. 
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15 Tot de volgende keer 


De meeste programma’s die u op uw computer maakt, wilt u de volgende keer 
weer gebruiken en dan nog het liefst zonder alle poespas van de vorige keer. Een 
nadeel van de computer is in zo’n geval de aan/uit-knop, want als u het apparaat 
uitzet, bent u meteen alle ingevoerde gegevens kwijt. Laat u het ding aanstaan dan 
wordt de stroomrekening als het ware gelanceerd. 

Wat moet u doen? Gewoon alles op een cassettebandje proppen. Saven en loaden 
dus! 

Welnu, dat loaden en saven is een heel gedoe met een MSX-computer. Een echt 
goed cassetteprotocol ontbreekt en daarom moet u dat zelf in elkaar zetten. Denkt 
u even mee, wat hebben we nodig om te kunnen saven? Een bestandsnaam, een 
startadres en een eindadres (aangenomen dat u voor de recorder en het bandje 
zorgt). 

Om te beginnen starten we de band, we plaatsen een vast aantal keren een 
bepaalde waarde op de tape zodat de computer tijdens het loaden het begin van 
een file kan vinden. Vervolgens schrijven we de bestandsnaam weg, hierna (ook al 
weer voor het loaden) het beginadres en het aantal bytes dat ge-saved worden. En 
ten slotte zet u de inhoud van het geheugengebied op de band. 


Het loaden vervolgens: starten, het begin van een file opzoeken (een vast aantal 
keren diezelfde waarde), de bestandsnaam inlezen en vergelijken met de door de 
gebruiker opgegeven bestandsnaam. (Zo nee, doorzoeken. Zo ja, inlezen!) Ver- 
volgens het startadres opzoeken en opslaan, het aantal te loaden bytes inlezen en 
deze ten slotte loaden en in het geheugen zetten. 


TIP: tijdens het loaden is het zeer eenvoudig om vanaf een ander startadres te 
schrijven. Bedenkt u zelf maar hoe! 
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10000 
10010 
10020 
10030 
10040 
10050 
10060 
10070 
10080 
10090 
10100 
10110 
10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
10270 
10280 
10230 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10350 
10330 
10400 
10410 
10420 
10450 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 


ORIGIN ($c000) 

50OOa2 CONSTANT ChPut 
50008 CONSTANT GtTrig 
$OOel CONSTANT Tapion 
$0Oe4 CONSTANT TapIn 
$0Oe7 CONSTANT Taplof 
500ea CONSTANT Tapôon 
$00ed CONSTANT TapÖut 
$OOFO CONSTANT TapOof 


CODE 


Stapel .wo $0000 
Begin wo $e000 
Eind ‚wo He400 
Name ‚ch “testje” 
‚by $Oa,sOd, 500 
‚Deze Je Seaman 7 
‚by $Oa,$Od, $0O 
sRecPly ch “press record and play on tape” 
‚by $0a,$0d, 500 
:RewPly .ch “rewind - press play on tape” 
‚by $Oa,$Od, OO 
:IOTxt ‚ch "io-error!” 
‚by $Oa,sOd, BOO 
:SavTxt ch "saving: 
‚by #00 
:ZkTxt ‚ch “searching: 
‚by #00 
YndTxt ch “found: 
„by #00 
LdTxt „ch “loading...” 
‚by $0a,$Od, 500 
Ready ch “ready! 
‚by $Oa,fOa,sOd, 500 
Print 
Id a, (hl) 
or a 
retif 2 
call #ChPut 
ince hl 
je HPrint 
Error 
Id sp, (#Stapel) 
call #HTapOof 
ld hl,#IOTxt 
jp FPrint 
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LOS Z = 


10530 
10540 
10550 
10560 
10570 
10530 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
106650 
10670 
10680 
106830 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10890 
10900 
10810 
10920 
10930 
10940 
108950 
10960 
10970 
10980 
10990 
11000 
11010 
11020 
11030 
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. Won 


push bc 

push de 

push hl 

Id a,#0 

call #TapOon 
jpif cs,#Error 


Pull 


pop hl 
pop de 
pop be 
ret 


:WChr 


push bc 

push de 

push hl 

call #TapOut 
jpìif cs,tError 
jr #Pull 


:RChr 


push be 

push de 

push hÌ 

calì #Tapin 
jpif es,tError 
je #Pull 


Ron 


push bc 

push de 

push hl 

call #Taplon 
jePif os,#Error 
je #Pull 


Dave 


id (#Stapel),sp 
ld hl,#SavTxt 
call BPrint 

ld hl, #Name 
call #Print 
call #Won 

ld b,#16 


: Savel 


ld a,#$80 
call #WChr 
djnz #Save0 
ld hl, Name 
ld b, #6 


11040 
11050 
11060 
11070 
11080 
11090 
11100 
Lito 
11120 
11130 
11140 
11150 
11160 
11170 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11330 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11430 
11500 
11510 
11520 
11530 
11540 
11550 


Bavel 
ld a,(hl) 
call #WChr 
inc hìÌ 
djna #Savel 
call #TapOof 
ìd hl, (#Begin) 
push hl 
ld de, (#Eind) 
ex hl,de 
or ä 
sbe hl,de 
push hl 
ld (#Eind),hl 
call #Won 
ld b,#2 
‘paved 
pop hìÌ 
ld a,l 
call #WChr 
Id a,‚h 
call #WChr 
djnz #SaveZ 
ld de, (t#Begin) 
ld hl, (#Eind) 


‚Saved 


ld a, (de) 

call #WChr 

inc de 

dee hl 

ìÌd a,‚h 

On: 

jpif nz, HtSave3 
call #TapOof 
ld hl, #Ready 
jep FFrint 


Load 


ld (#Stapel),sp 


Load 


Id hl,#ZkTxt 
call #Print 

ld hl, Name 

call #Print 

call #Ron 


Load1 


ld b,#16 


‘Load? … 


call #RChr 

cp #580 

jpif nz, #Load1 
dina #Load2 
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11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11630 
11690 
11700 
11710 
11720 
11790 
11740 
11750 
11760 
11770 
11780 
11790 
11800 
11810 
11820 
11830 
11840 
11850 
11860 
11870 
11880 
11890 
113900 
11910 
11920 
11930 
11940 
11950 
11960 
11970 
11980 
11990 
12000 
12010 
12020 
12030 
12040 
12050 


12060 -- 


ld hl,#Deze 
ld b,#6 


:Load3 


call #Rchr 

ld {hl}& 

de hl 

djns #Load3 
ld (hl), #0 
call #Taplof 
ld hl, #YndTxt 
ld a,t$0a 

ld (#Dezet6),a 
call #Print 
ld hl,#Deze 
call #Print 
ld de, Name 
\d hì,#Deze 
ld b,#6 


:Load4 


ld a, (de) 

cp (hìÌ) 

jpif nz, t#Loadû 
inc de 

ine hìÌ 

djns #Load4 

id hl,#LdTxt 
call #Print 
call #Ron 

ld b, #2 


:Load5 


call #RChr 

ld l,a 

call #RChr 

Id h‚a 

push hl 

djna #Load5 
pop de 

ld (#Begin),de 
pop hÌ 


:Loads 


call #RChr 

ld (de),a 

inc de 

dec hÌ 

ld a,‚h 

or Ì 

jpif nz, t#Load6 
call #Tapliof 
ld hl,#Ready 
je #Print 


12070 :Wacht 
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12080 
12090 
12100 
12110 
12120 
12130 
12140 
12150 
12160 
12170 
12180 
121890 
12200 
12210 
12220 
12230 


Id a,#0 

call HGtTrig 
cp HSÉÉ 

jeif na,#Wacht 
ret 


Init 


12240 —- 
12250 ENDCODE 


ld hl,t#RecPly 
call #Print 
call #Wacht 
call #Save 

ld hì,#RewPly 
call #Print 
call #Wacht 
call #Load 

jp HWacht 


s. COOO 
.: COO4 
COOS 
is GOOE 
: CO10 
CO L4 
. CO18 
es COTE 
ss GO20 
‚…: COZ4 
: CO28 
GOS 
 CO030 
CO34 

‚ CO38 
GOE 
: CO40 
‚…: CO44 
: CO48 
.: CO4GC 
a GOB0 
: CO54 
Ee GOS8 
0056 
„4 GOBO 
: GO64 
ee 6U68 
ss COB 
: CO7O 


00 00 00 BO See 
OQ E4 54 45 “.….TE" 
53 54 4A 45 “STJE" 
OA OD 00 2E “‚...” 
2E 2E 25 2E oe 
2E OA OD OO Tam 
50 52 45 53 “PRES' 
b3 20 52 45 "5 RE" 
43 4F 52 44 “GORD' 
20 41 4E 44 " AND" 
20 50 4C 41 " PLA 
59 20 4F 4E “Y ON 
20 54 41 50 “ TAP" 
45 OA OD 09 "EE... 
B2 45 57 43 “REWI' 
AE 44 20 2D PND —” 
20 50 52 45 " PRE” 
53 53 20 50 "SS PE 
4C 41 59 20 "LAY ” 
AF 4E 20 54 “ON T" 
41 50 45 OA “APE.” 
OD O0 49 4F “‚.I0” 
2D 45 52 52 =ERR" 
AF 52 21 OA “OR!.” 
OD 00 53 41 “..SA" 
56 49 4E 47 VING" 
3Â 20 00 53 “5: . 
45 41 52 43 "EARG 
48 49 4E 47 "“HING' 


CO74 
CO078 


CO7G 


CO80 


COB84 


CO88 


“+ CO8C 


CO 30 


“: CO94 


CO98 
CO9C 
COAO 


COA4 


COA8 


| COAG 


COBO 


COB4 


COB8 


COBG 


COCO 


COC4 


COCS 


‚OCC 


CODO 


‚1 COD4 


COD8 


1 CODC 


COEO 


COE4 


3A 
4F 
JA 
AF 
4E 
2E 
52 
59 
OD 
Cs 
23 
ED 
CD 
56 
CO 
3E 
00 
El 
C5 
ED 
CO 
C5 
E4 
GO 
C5 
El 
CO 
ED 
2 


20 
55 
20 
41 
47 
OA 
45 
2 
00 
CD 
03 
7B 
FO 
CO 
C5 
00 
DA 
D1 
D5 
00 
C3 
D5 
00 
C3 
D5 
00 
C3 
La 
62 


00 
4E 
00 
44 
2E 
OD 
41 
OA 
7E 
AZ 


00 
O0 
C3 
D5 
CD 
ÂO 
Cl 
E5 
DA 
B8 
ES 
DA 
B8 
E5 
DA 
Bö8 
0Ô 
CO 


46 
44 
4G 
49 
2E 
00 
44 
OA 
B7 
00 
CO 
CO 
ze 
96 
E5 
EA 
CO 
C3 
CD 
AO 
CO 
CD 
AO 
CO 
GD 
AO 
CO 
CO 
CD 


“OUND” 
"OADI” 
uNG. 


"READ" 
bne: 
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: COEB8 


COEC 


…: COFO 
e COEA 
…: COF8 
.…: COFG 

: C100 


C104 


“: C108 
CL0C 


C110 


GLE 
‚ C118 


C11C 


1 €120 
ss GlL24 


C128 


026 
ee GLSU 
GL 34 

 C138 


C13C 


‚…: C140 
.: C1l44 
‚…: C148 
„ CL4C 
se 150 
CLO 4 
«s €158 
„5 0150 
.: C160 
n C164 

: C168 
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CO96 
CO97 
CO98 
CO99 
CO9C 
CO9D 
COAO 
COA4 
COA7 
COAA 
COAD 
COAE 
COAF 
COBO 
COB2 


96 
CO 
CD 
10 
BG 
21 
06 
GO 
CD 
02 
5B 
B7 
22 
AD 
El 
GO 
CO 
B 
O4 
BO 
7G 
C1 
21 
96 
00 
CO 
2 
96 
CO 
C8 
C2 
F6 
06 


7E 
B7 
C8 
CD 
2d 
C3 
ED 
CD 
21 
C3 
C5 
D5 
ES 
3E 
CD 


CO 
CD 


3E 
CO 
06 
TE 
23 
Fo 
CO 
O4 
ED 
04 
CO 
10 
76 
10 
02 
CO 
GO 
B5 
CD 
8C 
CO 
CO 
CD 
06 
CO 
06 
CO 
59 
21 
06 


A2 


896 
7B 
Fo 
56 
96 


00 
EA 


21 
96 
CO 
80 
10 
GO 
CD 
10 


ES 
CO 
52 
CO 
06 
CD 
GD 
F5 
CO 
jÀA 
13 
C2 
FO 
CO 
ED 
21 


CO 
CD 
10 
FE 
C1 
OF 
CD 


00 


CO 
00 
00 
CO 
CO 


00 


06 
GO 
06 
CD 
F9 
06 
BG 
F9 


ED 
EB 
E5 
CD 
O2 
BG 
BG 
ED 
RN 
CD 
eB 
32 
00 
C3 
73 
6E 


CD 
D4 
CD 
BO 
10 
CO 
C8 


CO 


LD A, (HL) 
OR À 

RET Z 

CALL $OOAZ 
INC HL 

JP $CO96 

LD SP, ($CO00) 
CALL $OOFO 
LD HL,$CO56 
JP $CO96 
PUSH BC 
PUSH DE 
PUSH HL 

LD A,‚$00 
CALL SOOEA 


.…: C16C 


C170 
C174 
C178 


Ee OLTE 


C180 
C184 
C188 


“: CL8C 


C130 
C194 
C198 


“ C19C 


C1A0 
ClIA4 
C1ÂS 


CIAC 


C1BO 


Ĳ C1B4 


C1B8 
C1BC 
C1CO 
C1C4 
C1C8 
C1GC 
C1D0 


C1D4 


CiD8 


: CLDC 


C1EO 


1 C1E4 


C1ES 


CIEC 


CO 
F9 
E7 
CO 
15 
CO 
CD 
06 
GO 
BE 
13 
21 
96 
CO 
C8 
C8 
10 
53 
CD 
13 
C2 
E7 
CO 
3E 
O0 
C8 
18 
CO 
GD 
38 
GO 
CD 
C8 


17 
36 
ie 
3E 
CO 
21 
96 
CO 
Ò6 
Ge 
23 
TE 
CO 
06 
CO 
CO 
F5 
02 
CB 
2B 
B4 
00 
C3 
00 
FE 
C1 
GO 
CD 
EO 
Co 
CD 
46 
C1 


23 
00 
21 
OA 
CD 
OF 
CO 
21 
O6 
4 A 
10 
CO 
CD 
02 
GF 
67 
Di 
CO 
CO 
70 
GL 
21 
96 
CD 
FF 
C9 
CD 
C8 
GO 
CD 
C8 
C1 
C8 


10 
CD 
17 
32 
96 
CO 
LEL 
OF 
lÁ 
C1 
F7 
CD 
D4 
CD 
CD 
E5 
ED 
El 
12 
B5 
CD 
86 
CO 
D8 
C& 
2d 
96 
C1 
21 
96 
C1 
C3 
FG 


- … e - " nm a . 
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- 
mn ne En gn OS on 
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u _ 8 


COB5 
COB8 
COB9 
COBA 
COBB 
COBG 
COBD 
COBE 
COBF 
COC2 
GOC5 
COCB8 
COC9 
COCA 
COCB 
COCE 
COD1 
COD4 
COD5 
COD6 
COD7 
CODA 
CODD 
COEO 
COE4 
COE7 
COEA 
COED 
COFO 
COF3 
COFS 
COF7 
COFA 
COFG 
COFF 
C101 
C102 
C105 
C106 
C108 
C10B 
C10E 
C10F 
C113 
Cil4 
C115 
CEES 
C118 
C11B 
CilE 
C120 


DA 
E1 
Di 
C1 
C9 
C5 
D5 
E5 
CD 
DA 
C3 
C5 
D5 
E5 
CD 
DÀ 
C3 
C5 
D5 
E5 
GD 
DA 
C3 
ED 
dl 
CD 
21 
CD 
CD 
06 
3E 
CD 
10 
21 
06 
7E 
CD 
23 
10 
CD 
2Â 
E39 
ED 
EB 
B7 
ED 
ES 
22 
CD 
06 
El 


AQ 


ED 
AO 
B8 


4 
Â© 
B8 


El 
AO 
B8 
73 
62 
96 
06 
96 
AD 
10 
80 
BG 
F9 
06 
06 


BC 
F9 
FO 
02 


SB 


52 


04 
AD 
02 


CO 


00 
CO 
CO 


00 
CO 
CO 


00 
CO 
CO 
00 
CO 
CO 
CO 
CO 
CO 


CO 
CO 


CO 


00 


CO 


04 


CO 
CO 


CO 


CO 


JP G,$COAO0 
POP HL 

POP DE 

POP BO 

RET 

PUSH BCG 
PUSH DE 
PUSH HL 
CALL SOOED 
JP C,$COA0 
JP $COB8 
PUSH BC 
PUSH DE 
PUSH AL 
CALL SOOE4 
JP C,$COAO 
JP $COB8 
PUSH BC 
PUSH DE 
PUSH HL 
CALL SOOE1 
JP C,8COAO0 
JP $COB8 

LD ($COO0),SP 
LD HL, $CO62 
CALL $CO96 
LD HL, $CO06 
CALL $CO96 
CALL SCOAD 
LD B,$10 

LD A,$80 
CALL $COBG 
DJINZ @COFS5 
LD HL, $CO06 
LD B, $06 

LD A, (HL) 
CALL SCOBC 
INC HL 

DINA @C1O01 
CALL $00FO 
LD HL, ($CO02) 
PUSH HL 

LD DE, ($CO04) 
EX DE, HL 

OR Â 

SBC HL,DE 
PUSH HL 

LD ($COO04), HL 
CALL $COAD 
LD B,$02 
POP HL 
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GE2L 
C1Z2 
C125 
C126 
C129 
C12B 
C12F 
C132 
CL133 
C136 
C137 
C138 
C139 
C13ÀA 
C13D 
C140 
C143 
C146 
C14A 
C14D 
C150 
C153 
C156 
C159 
C15B 
C15E 
C160 
C163 
C165 
C168 
C16A 
C16D 
C16E 
C16F 
C171 
C179 
C176 
C179 
C17B 
C17E 
C181 
C184 
C187 
C18A 
C18D 
C18F 
C190 
C191 
C194 
C195 
C196 


7D 
CD 
TC 
CD 
10 
ED 
2Â 
1Â 
CD 
13 
ZB 
7C 
B5 
C2 
CD 
1 
C3 
ED 
ZL 
CD 
21 
CD 
CD 
06 
CD 
FE 
C2 
10 
det 
06 
CD 
ld 
23 
10 
36 
CD 
21 
3E 
Jz 
CD 
21 
CD 
Eel 
21 
06 
1Â 
BE 
C2 
13 
23 
10 


BC 


BC 
F5 
5B 
04 


BC 


32 
Fô 
8C 
96 
73 
6B 
96 
O6 
96 
D4 
10 
C8 
80 
59 
F6 


06 
C8 


F9 
00 
E7 
Tat 
OA 
15 
96 
OF 
96 
O6 
OF 
06 


4ÀA 


F7 


CO 
GO 


O2 
CO 


CO 


Cl 
OO 
CO 
CO 
0Û 
CO 
CO 
CO 
CO 
CO 


CO 
C1 
CO 


CO 


00 
CO 


CO 
CO 
CO 
CO 
CO 
CO 


C1 


CO 


CO 


LD A‚L 

CALL SCOBG 
LD A,H 

CALL $COBG 
DJNA @C120 
LD DE, ($COO02) 
LD HL, ($CO0O4) 
LD A, (DE) 
CALL $COBC 
INC DE 

DEC HL 

LD A,H 

OR L 

JP NZ,$C132 
CALL $OOFO 
LD HL, $CO8C 
JP $CO96 

LD ($COOO0),SP 
LD HL,$COSB 
CALL $CO96 
LD HL, $COO6 
CALL $CO96 
CALL $COD4 
LD B,$10 
CALL $COCB 
CP $80 

JP N4,$C159 
DJNZ @C15B 
LD EL, SCOOF 
LD B, $06 
CALL $COC8 
LD (HL),À 
INC HL 

DJNZ @C16A 
LD (AL), $00 
CALL $OOE7 
LD HL, SCOTT 
LD Â,$0Â 
LD ($CO15),A 
CALL $CO96 
LD HL, $COOF 
CALL $CO96 
LD DE, $COO06 
LD HL, $COOF 
LD B, $06 

LD A, (DE) 
CP (BL) 

JP NZ, $C14À 
ING DE 

INC HL 

DJNZ @C18F 


C193 21 7F CO LD HL, $CO7F 


14 CI9B CD: 9660 CALL $CO95 
.5 C19E CD D4 CO GALL SCOD4 

„i GlAL-06: O2 LD B, $02 

‚… C1A3 CD C8 GO CALL $COC8 
.; C1A6 6F LD L‚A 

‚; C1A7 CD C8 CO CALL $COC8 
‚ C1AA 67 LD H,Á 

.; C1AB ES PUSH HL 

‚; C1AC 10 F5 DJNZ @C1A3 
‚; C1AE D1 POP DE 

‚3 CIAF ED 53 02 CO LD ($COO2),DE 
„… C1IB3 El POP BL 

.; C1IB4 CD C8 CO CALL $COC8 
re CIBT 12 LD (DE),A 
si CIBE 13 ING DE 

1 CIB9 ZB DEC HL 

.‚ CIBA 7G LD A,H 

„3 C1IBB B5 OR L 

„3 CLBC G2- BA GI JP NZ,SC1B4 
‚> C1BF CD E7 00 CALL SOORT 
‚5 CIC2 21 8C CO LD HL,$CO8G 
165 03 J6- GO JP $CO96 

.; C1CB 3E 00 LD A,$00 

‚5 C1CA CD D8 OO CALL $00D8 
.; C1ICD FE FF CP SEF 

e CICP G2 G8 GL JP NZ,$C1C8 
so GLD2 68 RET 

„ACID3 21 18 CO LD HL,$CO18 
‚; C1D6 CD 96 CO CALL $CO96 
.5 CiD9 CD C8 C1 CALL $C1C8 
‚; CIDC CD EO CO CALL $COEO 
.; C1IDF 21 38 CO LD HL, $CO38 
.; C1IE2 CD 96 CO CALL $CO96 
5 GIED ED CB-G1 CALL $C1C8 
.; C1E8 CD 468 C1 CALL $C146 
27 CHER 63:08: 0 JP $C1C8 
Toelichting 


Het werken met de cassetterecorder houdt veel meer in dan het starten van de 
motor. Denkt u maar eens aan al die meldingen, gaat het goed, fout of goed fout? 
Er zijn van die mensen die onderscheid kunnen maken tussen de diverse bliep- 
bliep-geluiden. Een handige eigenschap, maar het is natuurlijk veel handiger als u 
weet wat er precies met het bandje gebeurt. Het zou vervelend zijn als u ‘ZZ-Top’ 
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in de recorder plaatste, in de waan dat u een hardcopy-routine probeerde binnen 
te halen… 

Voor onze tape-routines denken we aan slimme terugkoppelingen en een eigen 
opslagmethode. In de listing ziet u al diverse systeemboodschappen en we gaan ze 
allemaal serieus gebruiken. 


Cassetteroutines op een MSX-computer zijn niet bepaald eenvoudig te noemen, 
maar als u uiteindelijk over een geolied systeem beschikt, is fouten maken verder 
onmogelijk. We gaan het weer label voor label bekijken. (Houdt u de BIOS- 
appendix er even bij, dank u!) 


PRINT is u inmiddels welbekend. 


ERROR wordt aangeroepen als er een I/O-error werd gesignaleerd. Het kan om 
een CTRL/STOP-combinatie gaan, maar ook is het mogelijk dat de cassetterecor- 
der ‘hangt’. We halen (om een juiste terugkeer te garanderen) de oorspronkelijke 
stapelwijzer voor de dag en we keren met een error-melding weer terug in ons 
hoofdprogramma. 

WON zet de belangrijkste registerparen op de stapel. We plaatsen een nul in de 
accumulator om een korte header te garanderen en we duiken BIOS-TAPOON 
in. Als er een error mocht optreden, verwerken we deze. Het ontbreken van een 
error heeft tot gevolg dat we de registerparen weer van de stapel halen om 
vervolgens terug te keren. 


WCHR schrijft een byte naar de cassette via de BIOS-TAPOUT, en houdt 
rekening met een eventueel opgetreden error (Met stapelbezoek). 


RCHR leest een byte vanaf de cassette via de BIOS-TAPIN. Ook hier denken we 
weer om die error (dus met eventueel stapelbezoek). 


RON start de cassettemotor en garandeert een aanloopje richting header via de 
BIOS-TAPION. Opgelet voor die error, ook hier wederom met stapelbezoek. 


SAVE zet om te beginnen de stack pointer opzij voor de eventueel aan te roepen 
error-routine. Vervolgens drukken we (gebruikersvriendelijk als altijd) een bood- 
schap af. 

De motor wordt gestart. Eerst zetten we 16 (deze waarde kunt u veranderen, maar 
dan ook bij de LOAD-routine!) maal dezelfde waarde (nooit $00 of SFF!) op de 
band, om later het begin van een programma te herkennen. 
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Nu de bestandsnaam (lengte 6 tekens) naar de cassetteband. Hierna zetten we de 
motor voor de zekerheid even uit (kritiek punt bij het weer binnenhalen van een 
file!) en we berekenen het begin-adres en het aantal te plaatsen bytes. Deze 
waarden gaan met een inmiddels weer gestarte motor naar de tape. 

Eenmaal alle administratie achter de rug? Dan gaat het eigenlijke geheugengebied 
naar de band, waarna we de boel afsluiten met een READY-melding. 


LOAD zet eveneens de stapelwijzer apart. Nu drukken we de gezochte bestands- 
naam af waarna we op zoek gaan. 

Motor aangezet, vervolgens op jacht naar die zestien speciale waarden...Een 
afwijking en we beginnen weer opnieuw! Klopt het patroon daarentegen dan moêt 
er een bestandsnaam volgen. 

We hebben dus iets gevonden, we kijken wat het is, we maken melding en we 
vergelijken. Als het patroon opnieuw afwijkt, springen we weer terug. Klopt het 
dan beginnen we met het werkelijke loaden. 

De save-routine heeft twee waarden op de band gezet: het startadres en de 
hoeveelheid binnen te loaden materiaal. We lezen beide waarden in. (Op dit 
moment kunt u het startadres vervangen door een nieuw startadres, maar opge- 
past!) 

Het hart van de routine is eindelijk bereikt. Nu begint het feitelijke loaden: een 
waarde halen, schrijven, nog eentje enz. tot het einde van het bestand is bereikt. 
Hierna meldt de computer dit aan de gebruiker door middel van een READY- 
boodschap. 


De routines: 


WACHT is een oude bekende. 


INIT verzorgt ook een stukje tape-OS met behulp van een tweetal mededelingen, 
en springt naar de save- en load-routines. 


TIP: een verify-routine lijkt verschrikkelijk veel op de load-routine. Alleen moet u 


nu vergelijken in plaats van schrijven. Op het moment dat een waarde afwijkt, 
springt u naar een speciale VERIFY ERROR-routine. 
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Nog even dit 


Met de acht omschreven routines kunt u nu iedere willekeurige invoer en/of 
uitvoer controleren. Het spreekt voor zich dat er nog iets dient te gebeuren met al 
die data. Misschien iets in de richting van tekstverwerken, grafisch printen, of u 
zoekt het in de recreatieve sfeer? Het maakt allemaal niet uit, als alle gebruikte 
subroutines maar werken, want daar draait het immers om. 


Het kan intussen geen kwaad om de routines in te typen en uit te testen. Als u een 
aantal routines tegelijk wilt gebruiken, kunt u ze met de A-instructie van HERBY- 
MON op een ander adres assembleren, u kunt ze verplaatsen met de T-instructie, 
of binnen loaden op een nieuw adres met de L-instructie. 
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16 MSX a la carte.… 


In de volgende hoofdstukken gaan we een aantal MSX-moegelijkheden eens op 
een alternatieve manier bekijken. Videomogelijkheden wel te verstaan! 


16.1 Achter de schermen van een MSX-computer 


Zoals u weet, heeft een MSX-computer (MSX1) vier verschillende screen modes 
(schermconfiguraties: de mogelijkheden van een specifiek videoscherm) die alle 
vier over specifieke eigenschappen beschikken. 


e De 40 x 24-mode (0) is eigenlijk alleen geschikt voor brede tekst-editing. 

e De 32 X 2-tekst-mode (1) is een smallere versie van de eerste, maar ook sprites 
zijn nu toegestaan. 

e De hires mode (2) werkt nogal bedriegelijk. We beschikken namelijk niet over 
een echt hires-scherm maar meer over een drietal programmeerbare karakter- 
sets. Dit biedt echter legio mogelijkheden voor onder andere flitsende spelpro- 
grammering. 

e De multi color mode (3) ten slotte lijkt een zeer ingewikkelde toestand, maar 
ook hierin kunnen we in machinetaal leuke grappen uithalen. 


Het toverwoord sprites is reeds gevallen. Wat zijn sprites? Sprites zijn speciale, 
onafhankelijk te manipuleren stukjes scherm..Met andere woorden: handige 
poppetjes. 

De MSX voorziet in maar liefst 32 van dergelijke karakter-achtige wezens die, 
onafhankelijk van wat dan ook, overal op het scherm te voorschijn zijn te toveren. 
Zonder veel moeilijkheden heeft u nu een mogelijkheid gekregen tot verfraaiing 
van al uw programma’s. Een spectaculaire titelpagina’, tijdaanduiding, invaders 
enz. Ook op deze sprites komen we nog terug. 
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16.2 De videochip 


De videochip of VDP-processor is een aparte processor die een speciaal stuk 
programmeerbaar video-RAM beheerst. Deze processor beschikt over een spe- 
ciaal statusregister en acht werkregisters (zie appendix G). Het VDP-statusregis- 
ter informeert u over de toestand op dat moment. De acht werkregisters zijn alle te 
manipuleren met behulp van een speciale BIOS-routine, WRTVDP geheten. Een 
klein probleem: u kunt deze VDP-registers alleen maar beschrijven (write only). 
Gelukkig zijn er in het speciale BIOS-werkgebied nog een aantal schaduwregisters 
aanwezig: RGOSAV, RGISAV....en RG7SAV. 


Nu moet u ook nog met het videogeheugen (16K groot) kunnen communiceren. 
Daarvoor zijn er een RDVRM- of ‘lees videogeheugen’-commando en een 
WRTVRM-of ‘schrijf videogeheugen’-commando aanwezig. In appendix G leest 
u hoe u deze routines op de juiste wijze aanspreekt. 


Dit drietal (WRTVDP, RDVRM, WRTVRM) is in principe het enige pakket 
routines dat u nodig hebt om de hele videochip te besturen, ware het niet dat het 
MSX-systeem nog een aantal extra routines in huis heeft. Het is niet per se 
noodzakelijk om van deze routines gebruikt te maken, maar ze zitten toch al in het 
BIOS verwerkt. Dus waarom dan ook niet? 

Een paar voorbeelden van deze routines: DISSCR om het scherm uit te zetten, 
ENASCR zet het scherm weer aan, FILVRM vult een stukvideogeheugen met een 
door u bepaalde waarde, CLRSPR wist alie sprites enz. 

Alle routines worden wederom in de appendix besproken. 


16.3 Wat gaan we doen? 


We gaan de vijf bovenstaande principes behandelen maar zoals gezegd op een 
enigszins afwijkende wijze. Afwijkend van wat? Afwijkend van de MSX-systeem- 
principes. 

We werken tenslotte toch al in machinetaal en in machinetaal hoeft u zich niet aan 
de algemene richtlijnen te houden. Sterker nog, U bepaalt zelf wat de algemene 
richtlijnen zullen worden. In machinetaal kunt u het BASIC maar het beste even 
vergeten en dat geldt dus eveneens voor elk vastpinnend BASIC-protocol. 


Een voorbeeld. BASIC beschouwt de hires mode als bitmap, wij beschouwen de 
hires mode als drie karaktersets. U krijgt in hoofdstuk 19 een treffende illustratie. 
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17 Tekst 40 x 24 


In de 40 x 24-tekst-mode (zie afb. 17.1) neemt de schermtabel 960 ( = 40 x 24) 
bytes in beslag. Het scherm bestaat uit een rooster van 40 x 24 karakters. Dit 
rooster begint in het videogeheugen op geheugenlocatie $0000. 


L1AAAA1AAAAAAL11122222222 
012545G78IABCDEFOL25456/7/8IABCDEFOL254GG / 





56508 


saF88 





| 1 ER Tel LAA 
Eanssnnn renee Offel Hel ent En 
Eri EEE ERE soF9B .,.... 
| EEE HEEE OEE OO een 
| EHEER: FTTTEEENIT TE LEEEELDINN venne 
Eid dl LT OE 51066 
HEEE OTO DEE OE 15 





Afb. 17.1. Screen mode 0 


Iedere waarde (0-255) in dit stukje videogeheugen wijst naar een 6 x 8 pixel- 
patroon uit de karakterpatroontabel die begint op 50800. 
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De kleuren worden in het zevende VDP-register geplaatst. Sprites zijn helaas niet 


toegestaan. 


17.1 Scrollen 


10010 
10020 
10030 
10040 
10050 
10060 
10070 
10080 
10090 
10100 
toro 
10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
105380 
10400 
10410 
10420 
10430 
10440 
10450 
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ORIGIN ($c000) 
$004a CONSTANT RdY rm 
BOO4d CONSTANT WrtVrm 
“0056 CONSTANT FilVrm 
$00Oba CONSTANT IscNte 
$00d5 CONSTANT GtStcek 


CODE 
Teller 
Read 
Write 


:VPeek 


.by $00 
.wo $0000 
.wo $0000 


di 
call #RdVrm 
ei 
ret 
: VPoke 
di 
call 
ei 
ret 


EWrtVrm 


EVErLA 


di 
call #FilVrm 
ei 
ret 
‘scrolUp 
ld a,#23 
Id (#HTeller),a 
ld hl,#$0000 
Id (#Write),hl 
ld hl,#$0028 
ld (FRead),hl 
: Up0 
1d 
Upil 
ld hl, {(#Read) 
call #Vpeek 
inc hl 


D, #40 


10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10540 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10890 
108900 
10910 
10920 
10930 
10940 
10950 
10960 
10970 


ld (#Read),hl 
Id hl, (#Write) 
call #Vpoke 
ine hl 

ld (#Write),hl 
djnz #Upl 

ld hl,#Teller 
dec (hÌ) 

jpif na, #Up0 
ld a,#$20 

ld bc, #$0028 
ld hì,#$0398 
call #VFill 
ret 


: ScrolDown 


Id a,#23 

Id (#Teller),a 
la hl,#$03bf 
Id (#Write),hl 
ld hl,#$0397 
ld (#Read),hl 


Down 


id b,#40 


: Down l 


ld hl, (#Read) 
call #HVpeek 
dec hl 

Id (#&Read),hl 
Id hì,(#Write) 
call H#Vpoke 
dec hl 

ld (#Write),hl 
djnz #Down] 

ìÌd hl,#Teller 
dec (hl) 

jpif na, tDown0 
ld a,#$20 

ld bc, #$00Z8 
id hl, #$0000 
call #VFill 
ret 


sIntt 


call HIsceNte 
ld a, #0 
calì #GtStck 
cp #1 
IF 2 
THEN 
call #SerolDown 
ELSE 
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10980 
10990 
11000 
11010 
11020 
11030 
11040 —- 
11050 ENDCODE 


FI 
je #init 


: COOO0 
CO04 

: COO08 
COOC 

: CO10 
CO14 

: CO18 
CO1C 

: CO20 
‚…: CO24 
- CO28 
CO2C 

: CO30 
CO34 

. CO38 
CO3C 

.…: CO40 
: CO44 
: CO48 
.…: CO4C 
: CO50 
CO54 


00 
00 
00 
CD 
C9 
00 
17 
21 
03 
00 
06 
GO 
23 
2Â 
OB 
03 
21 
G2 
20 
21 
de 
32 


00 
F3 
FB 
4D 
F3 
FB 
32 
OO 
CO 
22 
28 
GD 
22 
03 
CO 
CO 
00 
28 
O1 
98 
CO 
00 


00 
GD 
C9 
00 
CD 
C9 
00 
00 
el 
O1 
2Â 
05 
O1 
CO 
23 
10 
CO 
CO 
28 
03 
3E 
CO 


F3 
CD 
FB 
C9 
F3 
CD 
FB 
C3 
F3 
CD 
FB 
C9 
3E 


6005 
CO06 

‚5 COO 
3 COOA 
; COOB 
GOOG 
COOF 


AA 
“: CO10 


00 


4D OO 


„5 CO11 
; COÌ2 


: 56 
; CO15 


00 
CO16 


s CO17 17 


cp #5 


IF z THEN 
call #ScrolUp 

FI 
O0 zes .s C058 BF 03 22 03 Bk 
4A "JJ" …… GO5C CO 21 87 BI Ptn 
F3 “mame «5 GO60 22 Ot COG 08 PA, 
EB. “Ms: .: CO564 28 ZA O1 CO (*..” 
De te .: CO68 CD 05 CO 2B "...+” 
BM Oad …rCHBE 22 Ol CO 2E Tk" 
CR ed .… CO70 03 CO CD OB *"_..." 
De OZ ‚…. CO0O74 CO ZB 22 03 “‚+"," 
Ze .: CO78 CO 10 EA 21 "ir" 
CO De. oe COPE BO GE BS OE 
Ol ".(x.” . CO80 63 CO JE 20 “e.> " 
CO U nbard .: COB84 O1 28 00 21 ".(.!" 
GO Be ‚s G088- 00 00 CA EL Peins 
CD “Kran .: COBG CO CD BA 00 ".. 
22 H.S oe GOI0 IE O0 CP DE "5 k 
EA iben. .: CO94 O0 FE Ol C2 “,,." 
35 aan : CO98 AD CO CD 52 "RR" 
3E ee CO9C CO C3 A8 CO ".,,.” 
ee A ‚… COA0 FE 05 C2 A8 "* jk 
Ch mg ‚: GOA4 CO GD 17 CO 
Te .: GOAB C3 8D CO OO 
2 he 

Di 

CALL $O0O4A 

EI 

RET 

DI 

CALL $004D 

EI 

RET 

DI 

CALL $0056 

El 

RET 

LD Â,$17 


* 1 " - . . E . « a … . . . . * | n - a u á LD] * . ’ . m . [] [ „ ä ä ä e ä ä u ne n n 
En dn nn OE nn en On en ee gn TE OE gn En MR nn nn MT me EN nn ME ne Ee Eg ee 


“ » - Li a „ 3 
en pn en ge en oe en 


CO19 
CO1C 
COIF 
CO22 
CO25 
CO028 
COZA 
CO2D 
CO30 
CO31 
CO34 
CO37 
CO3A 
CO3B 
CO3E 
CO40 
CO43 
CO44 
CO47 
CO49 
CO4G 
CO4F 
CO52 
CO54 
CO57 
COSÀA 
CO5D 
CO60 
CO63 
CO65 
C068 
CO6B 
CO6C 
COB6F 
CO72 
CO75 
COT76 
CO79 
CO7B 
CO7E 
COTE 
CO82 
CO84 
CO87 
CO8A 
CO8D 
CO90 
CO92 
CO95 
COI9T7 
CO9A 


32 
dt 
22 
2d 
22 
06 
ZA 
CD 
23 
22 
2Â 
CD 
23 
22 
10 
21 
35 
C2 
3E 
01 
21 
C3 
3E 
32 
21 
22 
21 
22 
06 
2A 
CD 
2B 
22 
ZA 
CD 
2B 
22 
10 
el 
35 
Ge 
3E 
O1 
21 
C3 
CD 
3E 
CD 
FE 
Ce 
CD 


OQ 
00 
03 
28 
Ol 
28 
O1 
05 


O1 
03 
OB 


03 
EA 
00 


28 
20 
28 
98 
ket 
id 
00 
BE 
03 
97 
O1 
28 
O1 
05 


O1 
03 
OB 


03 
EA 
00 


63 
20 
28 
0Û 
ii 
BA 
00 
D5 
O1 
AO 
52 


CO 
00 
CÛ 
00 
CO 


CO 
CO 


CO 
CO 
CO 


CO 
CO 
CO 
00 
03 
CO 
CO 
03 
GO 
03 
CO 


CO 
CO 


CO 
CO 
CO 
CO 
CO 
CO 


00 
0Û 
CO 
00 


0Ô 


CO 
CO 


LD ($COO0OO),A 
LD HL, $0000 
LD ($CO03), HL 
LD HL,$0028 
LD ($COO1), HL 
LD B,$28 

LD HL, ($COO1) 
CALL $CO05 
INC HL 

LD ($COO1),HL 
LD HL, ($CO03) 
CALL &COOB 
INC HL 

LD ($COO3),HL 
DJNZ @CO2A 
LD HL, $COOO 
DEC (HL) 

JP NZ,$CO028 
LD A,‚,$20 

LD BC, $0028 
LD HL,$0398 
JP $CO11 

LD A,$17 

LD ($CO00),A 
LD HL, $03BF 
LD ($COO3),HL 
LD HL, $0397 
LD ($COO1),EL 
LD B, $28 

LD HL, ($COO1) 
CALL $COO5 
DEC HL 

LD ($COO1),HL 
LD HL, ($COO3) 
CALL $COOB 
DEC HL 

LD ($COO3),HL 
DJNZ @CO065 

LD HL, $COOO 
DEC (HL) 

JP N4,8CO63 
LD A,$20 

LD BC, $0028 
LD HL, $0000 
JP $CO11 

CALL $O0OBA 

LD A,‚$00 

CALL $00D5 

CP $01 

JP NZ,$COAO 
CALL $COBZ 
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CO9D C3 A8 CO JP $COA8S 


.; COAO FE 05 CP $05 
‚; COA2 C2 A8 CO JP NZ, $COAS 
…, COA5 CD 17. CO CALL $CO17 
‚… COA8 C3 8D CO JP $COSD 

‚ COAB O0 NOP 


In deze screen mode gaan we ‘scrollen’ in machinecode. U weet hoe dat gaat? 
Tijdens het listen van programmaregels wordt de tekst omhoog gezet en wordt een 
nieuwe regel onderaan het beeld geplaatst. Dit proces, ‘scrolling’, programmeren 
wij nu ook; niet alleen omhoog maar ook omlaag. 


We gebruiken een miet-cyclische scroll over het gehele scherm. Naar boven 
bewegend komt dit neer op het volgende: 


e tweede regel op de eerste; 

e derde regel op de tweede; 

e laatste regel op de één na laatste; 
e aanvullen met spaties. 


Naar beneden scrollen gaat natuurlijk precies andersom. 
Dit alles gebeurt als u op de cursortoetsen drukt. 


17.2 De routines op een rij 


VPEEK haalt een geadresseerde waarde uit het videogeheugen. Het adres staat in 
HL en de waarde komt in het A-register te staan. 


VPOKE plaatst de inhoud van het A-register in het door middel van HL geadres- 
seerde video-adres. 


VFILL vult een stuk videogeheugen met een bepaalde waarde. Die waarde komt 
in de accumulator. De lengte van het te vullen gebied komt in het BC-registerpaar 
en het beginadres (We vullen naar boven!) komt in het HL-registerpaar. 


SCROLUP scrolt natuurlijk omhoog. Eerst wordt een teller (op 23) geïnitial- 
iseerd, evenals het eerste schermadres ($0000) en het schermadres van de volgende 


regel ($0028). 
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Een regel is 40 tekens breed dus we maken een binnenlus met lengte 40. Vervolgens 
gaan we regels verplaatsen, van beneden naar boven. Dit alles 23 keer. 

Na het scrollen maken we gebruik van de VFILL-routine om de onderste regel 
snel van spaties te voorzien. 


SCROLDOWN scrolt omlaag. Wederom wordt een teller (op 23) geïnitialiseerd, 
evenals het laatste schermadres ($03BF) en het schermadres van de vorige regel 
(50397). 

Een regel is 40 breed, dus we maken een binnenlus met lengte 40. Vervolgens gaan 
we regels verplaatsen, van boven naar beneden. Dit alles natuurlijk 23 keer. 

Na het scrollen maken we gebruik van de VFILL-routine om de bovenste regel 
snel van spaties te voorzien. 

INIT gaat ervan uit dat het scherm al in de 40 x 24-mode staat (u komt tenslotte 
uitde HERBYMON)en kijkt naar de CTRL/STOP-toestand. Niets aan de hand? 
Dan worden de cursortoetsen uitgelezen en aan de hand daarvan wordt actie 
ondernomen. 
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18 Tekst 32 x 24 


In de 32 x 24-tekst-mode (zie afb. 18.1) neemt de schermtabel 768 ( = 32 x 24) 
bytes in beslag. Het scherm bestaat uit een rooster van 32 x 24 tekens, in het 


videogeheugen beginnend op $ 1800. 


Elke waarde (0-255) in dit stukje videogeheugen wijst naar een patroon van 8 x 8 
pixels uit de karakterpatroontabel die op $0000 begint. 


111111111111 
8123406 TDA 


ERRTAAEEL EEE THEELEN 0E 
EEE 
| 
BEENSEEESENLADE RORE SE 
| 





EE HEE 
EEE EE 
52008 
52001 
52016 
$201F 


Afb. 18.1. Screen mode Ì 
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s0098 


$8008 


56788 





$6790 


SB7FF 


UUUURRAA & B t/m f 
UUUUARAARA G 8 t/m 15 


UUUVAAAA G 128 t/m 155 
VUUVAAAA G 248 t/m 255 


OAMMMMMDG 
76545210 


De karakterkleuren (voorgrond en achtergrond) worden per groep van 8 in het 
videogeheugen vanaf adres $2000 geplaatst. Deze kleurentabel is dus 32 bytes 


groot. 


Sprites zijn toegestaan; de attributentabel begint op $ 1B00 en de patroontabel op 


53800. 


18.1 Karakters ontwerpen 


10000 
10010 
10020 
10030 
10040 
10050 
10060 
10070 
10080 
10090 
10100 
10110 
10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
10270 
10280 
102390 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 


ORIGIN ($ec000) 


$004a CONSTANT RdYrm 
$OO4d CONSTANT WrtYrm 
BOOEF CONSTANT Init32 
SOOIf CONSTANT ChGet 
$00a2 CONSTANT ChPut 
$00ba CONSTANT IseNte 
$0156 CONSTANT KilBuf 
$fJaf CONSTANT Lin32 
$fIdd CONSTANT CrsX 
sf3de CONSTANT CrsY 
$fca7 CONSTANT Escônt 
CODE 
‘Help „by #00 
‘Teller ‚by $00 
‘Positie wo $0O000 
: VPeek 

di 

call #RdVrm 

ei 

ret 
: VPoke 

di 

call #WrtVrm 

ei 

ret 
GetPos 

ld a,#0 

ld b‚a 

Ìd a,(#Teller) 

sla a 

rl b 

sla a 
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10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10660 
10670 
10680 
10630 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10310 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10830 
10900 
10910 
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rì b 

sla a 

rl b 

ld (#Positie),a 
ld a,b 

Id (#Positie+ti),a 
ret 


GetLin 


ld a, (#CrsY) 


GetLin0 


cp Hil 

retif z 

ld de, (#Positie) 
inc de 

ld (#Positie),de 
dec a 

jp #GetLind 


:GetCol 


ld b,#128 
Id a, (H#CrsX) 


:GetCol0 


cp #13 
retif z 

srì b 

dec a 

jp HGetCol0 


: Setup 


ld hì,#$1800 
ld a, #0 


Setup 


call #VPoke 

inc hl 

inc a 

jpif nz, tSeturp0 
call #GetPos 

Id d,#8 

Id hl,#$194c 


Seturpl 


ld e,#3 

push hl 

Id hl, (#Positie) 
call #HVPeek 

inc hl 

ld (#Positie),hl 
pop hl 

Id b,#128 


:Setupe 


id (#Help),a 
and b 


10920 
10930 
103940 
10950 
10960 
10970 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11080 
11100 
11110 
11120 
11130 
11140 
11150 
11160 
11170 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11250 
11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 


IF z 
THEN 


Ìd a,#196 


ELSE 


ld a,#219 


FI 
call #YVPoke 
ine hl 
srl b 
ld a, (#Help) 
dec e@ 
jpif nz, Setup? 
ld be, #$0018 
add hl,be 
dee d 
jpif ns, tSetupl 
ret 
‚Plus 
ld hl,#Teller 
ince (hÌì) 
ret 
‚Min 
ld hl,#Teller 
dee (hl) 
ret 
: Up 
Id a, (#CrsY) 
ep #11 
retif 2 
ld a,t$le 
je #ChPut 
: Down 
ld a, (#CrsY) 
cp #18 
retif a 
ld a,#S1f 
jp #ChPut 
‘Left 
ld a, (#CrsX) 
cp #13 
retif z 
ld a,#&id 
jp #ChPut 
Right 
ld a, (#CrsX) 


127 


11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11530 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 
11700 
11710 
11720 
11730 
11740 
11750 
11760 
11770 
11780 
11780 
11800 
11810 
11820 
11830 
11840 
11850 
11860 
11870 
11880 
11890 
11900 
11910 
11920 
11930 
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—_ 


cp #ZÔ 
retif 2 
Id a,#$ic 
jep HChPut 


Pixel 


call #GetPos 
call #GetLin 
call #GetCol 
Id hl, (#Positie) 
call HVPeek 


xor D 
call #HVPoke 
je HRight 
:JmpTab ‚wo #Plus 
‚wo #Min 
„wo FUp 
‚wo #Down 
‚wo HlLeft 
‚wo #HRight 
wo #Pixel 
:KeyTab „by 43 
‚by 49 
‚by $ie 
„by $1f 
„by Bid 
„by &lc 
‚by 3 
.by O 
:SelfMod 
jp HSelfMod 
Init 
ld a,#32 


ld (#Lin3Z),a 
call Init32 
Ìd a,#13 

ld (#CrsX),a 
ld a, #11 

Id (#CrsY),a 


Init 


call #Setup 
call #KilBuf 


ERE) 


call #IscNte 
Id a,#0 

ld (#EscEnt),a 
call #ChGet 


11940 ld (#Help),a 

11950 Id hl,#KeyTab 

11860 ld de, #JmpTab 

11970 snie 

11980 Td ahl) 

11930 cp #0 

12000 SPEL Zok Initt 

12010 ld a, {(#Help) 

12020 cp (hÌ) 

12030 IF z THEN 

12040 ld a,(de) 

12050 ld (#SelfMod+1),a 

12050 inc de 

12070 ld a, (de) 

12080 ld (#SelfMod+2),a 

12030 call #SelfMod 

12100 jep #HInit0 

12110 FI 

12120 ine hl 

12130 inc de 

12140 inc de 

12150 dp #Init2 

12160 —- 

12170 ENDCODE 

.: CO00 00 00 00 00 NN CO54 36 C2 50 00 "EePa” 
: COO4 F3 CD 4A OO ce si GOS -CD 19 GO VB. Toa 
: COO08 FB C9 F3 CD E .: CO5C 08 21 4C 19 Ee Mei 

.: COOC 4D 00 FB CQ Ni s COB 1E O8: EB 2A "xx" 
.: CO10 3E 00 47 3A Es COB4 02 CO CD 04 ".,,.” 

.: CO14 Ol CO CB 27 oren : CO68 CO 23 22 02 "gr" ,* 
.: CO18 CB 10 CB 27 a GEE CO EL 06 80- "ar" 
: CO1C CB 10 CB 27 Bees fel : CO70 32 00 CO AO "2.,..' 
: CO20 CB 10 32 02 dn COT74 C2 TC CO 3E "‚t.>" 

.: CO24 CO 78 32 03 .X2,' : CO78 C4 C3 7E CO "...." 
«… GOZ8 CO C9 3A DE "ss! CO7TC 3E DB CD-0A “Se” 

.: CO02C F3 FE OB C8 "...…. : CO80 CO 23 CB 38 "#8" 
« CO030 ED 5B O2 CO “‚[.…. CO84 3A OO CO 1D ":...” 

.: CO34 13 ED 53 02 Ae .: CO88 C2 70 CO O1 ".p..” 
.: CO38 CO 3D C3 2D Sa ‚5 GO8G 13 00 O9 45 “a 
„…003C CO 06-80 JA “an” : CO90 C2 60 CO CI ".t," 
.: CO40 DD F3 FE OD Ea COS4 21 O1 CO 34 “t.4” 

.: CO44 C8 CB 38 3D "‚..8=" . CO98 CI 21 O1 CH "_I,* 
.: CO48 C3 42 CO 21 "….B.!" COSC 35 C9 JA DC "5: 

aA 00 18 BE O0 Es : COA0D F3 FE OB C8 ".. 
: CO50 CD OA CO 23 ik" COA4 3E 1E C3 A2 ">. 


129 


: COAG 


COAC 


“1 COBO 


COB4 


“: COB8 


COBG 


\: COCO 


COCA 


: COC8 


COCG 


Ee CODE 
… GOD4 
.: COD8 
.: CODC 
si COEO 
.: COE4 
.: COEBS8 
ss GOHS 
.: COFO 

. COF4 


. El - * „ u - * n . 5 * „ r - a “ . u * Li e 
ha OE en ng en ge nn en ng en nr en sn ee en an OW nn EE nn 
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COO4 
COO05 
COO8 
COO9 
COOA 
COOB 
COOE 
COOF 
CO 10 
CO12 
CO13 
CO16 
CO18 
CO1A 
CO1C 
COIE 
CO20 
COZ2 
COZ5 
CO26 
CO29 
CO2A 
COZD 
CO2F 
CO 30 
CO34 
CO35 


00 
FE 
iF 
3Â 
OD 
C3 
DD 
C8 
Â2 
CO 
CD 
O2 
CO 
CO 
94 
9E 
B4 
CA 
1E 
20 


F3 
CD 
FB 
C3 
F3 
CD 
FB 
Cg 
3E 
AT 
3Â 
CB 
CB 
CB 
CB 
CB 
CB 
32 
78 
32 
C9 
3A 
FE 
C8 
ED 
13 
ED 


3Â 
en 
C3 
DD 
C8 
A2 
F3 
3E 
00 
CD 
3D 
CO 
Â9 
C3 
CO 
CO 
CO 
CO 
1E 
00 


AA 


4D 


00 


O1 
2 
10 
27 
10 
df 
10 
02 


03 


DC 
OB 


5B 
53 


DG 
C8 
A2 
F3 
3E 
0Ô 
FE 
1C 
CD 
zÂ 
CO 
GD 
CD 
BE 
99 
A9 
BFE 
2B 
iD 
C3 


00 


OO 


CO 


CO 
GO 
F3 


Oz 


02 GO LD ($COOZ), DE 


F3 
3E 
00 
FE 
iD 
SA 
14 
C3 
10 
CO 
2Â 
04 
OA 
CO 
CO 
CO 
CO 
2D 
1C 
F6 


CO 


DI 

CALL $004A 
EI 

RET 

DI 

CALL $00O4D 
EL 

RET 


LD A,‚($COOI) 
SLA A 

RL B 

SLA A 

RL B 

SLA A 

RL B 

LD ($COOZ),A 
LD A,B 

LD ($CO03),A 
RET 

LD A, ($F3DC) 
CP SOR 

RET Z 


LD DE, ($COO2) 


ING DE 


COF8 
COFC 
C100 
C104 


C108 


G10C 
C110 
C1i4 
C118 
C11C 


C120 


C124 


\: C128 


C12C 
C130 
C134 
C138 
C13C 


: C140 


C144 


CO 
AF 
00 
DD 
32 
4B 
O1 
3E 
FG 
32 
EE 
CO 
CA 
00 
41 
F7 
32 
F6 
Cl 
C3 


3E 
F3 
3E 
F3 
DC 
CO 
CD 
00 
CD 
00 
CO 
TE 
1 
CÔ 
C1 
ee 
F8 
CO 
23 
25 


20 
CD 
OD 
3E 
F3 
CD 
BA 
32 
SF 
CO 
Ie 
FE 
C1 
BE 
1A 
18 
CO 
C3 
13 
C1 


32 
6F 
32 
OB 
CD 
56 
00 
ÂT7 
00 
21 
EO 
00 
3Â 
C2 
32 
1ÀÂ 
CD 
OB 
13 
JE 


w 


NS oe 


et. 


no A 


CO39 
CO3ÀA 
CO3D 
CO3F 
CO42 
CO44 
CO45 
CO47 
CO48 
CO4B 
CO4E 
CO50 
COB3 
CO54 
CO55 
CO58 
CO5B 
COSD 
CO6O 
CO62 
CO063 
CO66 
CO69 
CO6A 
CO6D 
COBE 
CO70 
C073 
COT74 
COT 
CO79 
CO7C 
CO7E 
CO81 
CO82 
COB4 
CO87 
CO88 
COS8B 
COB8E 
COBF 
CO90 
CO93 
CO94 
CO97 
CO98 
GOSS 
CO9C 
COSD 
COJE 
COA1 
COA3 


3D 
C3 
06 
3À 
FE 
Ca 
CB 
3D 
C3 
21 
JE 
CD 
23 
3C 
C2 
CD 
16 
21 
1E 
E5 
2Â 
CD 
23 
22 
El 
O5 
dè 
AO 
C2 
3E 
C3 
3E 
CD 


CB 
3À 
1D 
C2 
O1 
09 
15 
C2 
C9 
21 
34 
C9 
21 
35 
C9 
3Â 
FE 
Cö 


2D 
80 
DD 
OD 


38 


42 
00 
OO 
OA 


50 
10 
08 
4G 
08 


OZ 
O4 


02 


80 
O0 


LG 
C4 
7E 
DB 
OA 


38 
O0 


70 
18 


60 
O1 


O1 


DC 
OB 


CO 


F3 


CO 
18 


CO 
CO 
CO 
19 
CO 
CO 
CO 


CO 
CO 
CO 
CO 
CO 
CO 
00 


se 


CO 


CO 


F3 


DEC A 

JP $CO2D 

LD B, $80 

LD A,‚($F3DD) 
CP SOD 

RET 2 

SRL B 

DEC A 

JP $CO42 

LD HL,$1800 
LD A,‚$00 
CALL $COOA 
INC HL 

ING A 

JP NZ,$CO50 
CALL $CO10 
LD D,$08 

LD HL,$194C 
LD E,‚$08 
PUSH HL 

LD HL, ($CO02) 
CALL $COO4 
INC HL 

LD ($COO2),HL 
BOP BL 

LD B,$80 

LD ($COO0),A 
AND B 

JP NZ, 5CO7C 
LD A,‚$C4 

JP $CO7E 

LD A,‚$DB 
CALL $COOA 
INC HBL 

SRL B 

LD A‚($COO0) 
DEC E 

JP NZ, $CO70 
LD BC, 50018 
ADD HL, BC 
DEC D 

JP N4,$CO60 
RET 

LD HL, $COO1 
INC (HL) 
RET 

LD HL,$COO1 
DEC (HL) 

RET 

LD A,‚{($F3DC) 
CP $0B 

RET 4 
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COA4 
COA6 
COAS 
COAC 
COAE 
COAF 
COB1 
COB4 
COB7 
COB9 
COBA 
COBC 
COBF 
COC2 
COC4 
COC5 
COCT 
COCA 
COCD 
CODO 
COD3 
COD6 
COD9 
CODA 
CODD 
COEO 
COE] 
COEZ 
COE3 
COE4 
COES 
COEG6 
COE7 
COEB 
COE9 
COEA 
COEB 
COEG 
COEF 
COFO 
COF2 
COF3 
COF4 
COF6 
COFJ 
COFB 
COFE 
C101 
C103 
C106 
C108 
C1OB 


3E 
C3 
3Â 
FE 
C8 
3E 
C3 
3Â 
FE 
CB 
3E 
C3 
3A 
FE 
C8 
3E 
C3 
CD 
CD 
CD 
2Â 
CD 
A8 
CD 
C3 
94 
CO 
99 
CO 
9E 
CO 
Â9 
CO 
B4 
CO 
BE 
CO 
CA 
2D 
1E 
iD 
16 
20 
C3 
3E 
32 


3E 
32 
3E 
32 
CD 


1E 
AZ 
DC 
12 


LF 
A2 
DD 
OD 


iD 
A2 
DD 
14 


1C 
A2 
10 
2Â 
sD 
02 
04 


OA 
BF 


CO 
1F 


00 
F6 
20 
AF 
6F 
OD 
DD 
OB 
DG 
4B 


00 
F3 


O0 
F3 


OO 
F3 


00 
CO 
CÔ 
CO 
CO 
CO 


CO 
CO 


2B 


CO 


F3 
00 


F3 


F3 
CO 


LD A,$1E 

JP $00AZ 

LD A, ($F3DO) 
CP $12 

RET 2 

LD A,SÌiF 

JP $00AZ 

LD A, ($FS3DD) 
CP $0D 

RET Z 

LD A,$iD 

JP $00AZ 

LD A, ($F3DD) 
CP $14 

RET Z 

LD A,$1C 

JP $00AZ 
CALL $CO10 
CALL $CO2A 
CALL $CO3D 
LD HL, ($COO2) 
CALL $COO4 
XOR B 

CALL $COOA 
JP $COBF 
SUB H 

RET NZ 

SBC A,C 

RET NZ 

SBC A, (HL) 
RET NZ 

XOR GC 

RET NZ 

OR H 

RET NZ 

CP À 

RET NZ 

JP 4,82BC0 
DEG L 

LD E‚,S1F 
DEC E 

INC E 

JR N4,@COFB 
JP $COF6 

LD A,$20 

LD ($F3AF),A 
CALL $SOOBEF 
LD A,$0D 

LD ($F3DD),A 
LD A, $0B 

LD ($F3DC),A 
CALL $CO4B 


C10E CD 56 Ol CALL $0156 


.; C111 CD BA OÛ CALL $00BA 
.; C114 3E 00 LD A,$00 

.; C116 32 A7 FC LD ($FCA7),ÀA 
.; C119 CD 9F 00 CALL $OO9F 
aj C11C 32 00 GO LD ($CO00),A 
‚; C1IIF 21 EE CO LD HL, $COEE 
„3 C122 11 EO CO LD DE, $COEO 
5 GL25 AE LD A, (HL) 

‚; C126 FE 00 CP $00 

; C128 CA 11 CI JP Z,8CI11 

‚3 C12B 3A 00 CO LD A, ($CO00) 
‚ OLI2E BE CP (HL) 

.; C12F C2 41 C1 JP NZ,8C14Ì 
ss CLS LA LD A, (DE) 

5 CIS--d2 F7 GO LD ($COF7),À 
vi C136 13 ING DE 

a GIST JA LD A, (DE) 

„5 C138 32 F8 CO LD ($COF8),A 
‚s C13B CD F6 GO CALL $COF6 
CASE GOB CH JP $C10B 

„; C141 23 ING HL 

‚> C142 153 INC DE 

„> C143 13 INC DE 

‚> C144 C3 25 C1 JP $C125 

„5 C147 3E 1D LD A,S1D 


Als programmeervoorbeeld een karakterset-editor. Het wordt nu mogelijk om 
zelf een echte 8 x 8 karakterset te ontwerpen. 

Natuurlijk kunt u deze zelf ontworpen leestekens ook opslaan. Dit gaat vanuit 
BASIC met een video-SAVE-opdracht. Zo’n opgeslagen karakterset kunt u 
naderhand met een video-LOAD-commando weer ophalen. 

U kunt met behulp van de karaktertabel uit appendix B en de listings heel 
eenvoudig uitzoeken hoe de karakterontwerper nu precies werkt. Dit zelf uitzoe- 
ken is niet zonder reden. Als u namelijk weet hoe het edit-principe in elkaar steekt, 
wordt het zeer eenvoudig om zelf commando’s toe te voegen en eigen editors te 
ontwerpen. 

Welke commando’s en editors? Dat hangt van uw eigen fantasie en behoeften af. 


18.2 De routines op een rij 
VPEEK, u inmiddels bekend uit de vorige listing. 
VPOKE, idem dito. 
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GETPOS berekent de plaats waar de informatie over het huidige karakter staat. 
Dit komt neer op een ‘karakter maal 8'-berekening. 

We doen dit met behulp van een schuifinstructie. Denkt u even mee! Als we een 
bitpatroon naar links schuiven, doen we niets meer dan vermenigvuldigen met 2. 
Drie keerschuivenisdus2 x 2 x 2 = 8. (Eventussendoor: naar rechts schuiven is 
delen door 2...) 


GETLIN kijkt welk byte uit het patroon van 8 thans wordt bewerkt. We kijken 
hiervoor naar de Y-waarde van de cursor. 


GETCOL kijkt welk BIT uit het byte thans wordt bewerkt. We kijken hiervoor 
naar de X-waarde van de cursor. 


SETUP tovert een karakterset en het thans bekeken karakter te voorschijn. Eerst 
initialiseren we het HL-paar op $1800 (begin van de schermtabel), en we ‘video- 
poken’ de waarden 0-255 op het beeld. 

Van het nu bekeken karakter wordt de positie berekend en er wordt 8 (de hoogte) 
maal 8 keer (de breedte) het juiste pixel afgedrukt. 

PLUS verhoogt het huidige karakter met één. 

MIN verlaagt het huidige karakter met één. 

UP verplaatst, indien mogelijk, de cursor één locatie naar beneden. 

DOWN verplaatst, indien mogelijk, de cursor één positie naar boven. 

LEFT verplaatst, indien mogelijk, de cursor één positie naar links. 


RIGHT verplaatst, indien mogelijk, de cursor één positie naar rechts. 


PIXEL berekent de pixelpositie van de cursor en XOR-t deze waarde met de 
desbetreffende bitadressering. Pixel aan wordt pixel uit en andersom. 


JMPTAB bevat de adressen die worden aangeroepen als er op een commando- 
toets wordt gedrukt. 


KEYTAB bevat de ASCII-waarden die horen bij de commandotoetsen. Een 
KEYTAB-adressering is niet meer dan een pointer naar de vorige tabel. 


134 


SELFMOD is een CALL-routine die door de key scan wordt veranderd als er op 
een commandotoets wordt gedrukt. 

Stel dat de PLUS-routine moet worden aangeroepen. Het low-byte van PLUS 
komt van KEYTAB en wordt op SELFMOD + ! geplaatst, Het high-byte van 
PLUS komt van KEYTAB + 1 en wordt op SELFMOD + 2 geplaatst. 


INIT stelt de juiste schermbreedte en screen mode in, waarna (met CTRL/STOP- 
check) de juiste commando's worden bepaald enz. 
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19 High resolution 


In de high resolution mode of hires mode (zie afb. 19.1) neemt de schermtabel 768 
(= 32 x 24) bytes in beslag. Het scherm bestaat uit een rooster van 32 x 24 
karakters, in het videogeheugen beginnend op $1800. 


In tegenstelling tot de sereen mode uit het vorige hoofdstuk kan iedere scherm- 
positie nu over een eigen plaats in de karakterset beschikken. Dit wordt gedaan 
door drie verschillende karaktersets te gebruiken. Een karakterset voor de boven- 
ste 8 regels ($0000-507FF), een karakterset voor de middelste 8 regels ($0800- 
SOFFF) en een karakterset voor de onderste acht regels ($1000-$17FF). Elke 
waarde op een schermgedeelte (0-255) wijst naar een plaats in de bijpassende 
karakterset. Een 8 x 8 pixelpatroon dus, met 6K aan karakterinformatie. 

De karakterkleuren (voorgrond en achtergrond) worden per regel bepaald. Voor 
de eerste karakterset staat de kleurentabel op $2000-$27FF, voor de tweede 
karakterset op $2800-$2FFF en voor de derde karakterset op $3000-$37FF. Er is 
dus ook 6K aan kleurinformatie. 

Sprites zijn toegestaan; de attributentabel begint op $1B00 en de patroontabel 
begint op $ 3800. 


19.1 Spelletje spelen? 


10000 ORIGIN ($e000) 

10010 == 

10020 $000c CONSTANT RdSlt 

10030 #0056 CONSTANT FilVrm 
10040 $005ec CONSTANT LDirVm 
10050 $0072 CONSTANT IniGrp 
10060 $00ba CONSTANT IscNte 
10070 $00d5 CONSTANT GtStek 


10080 -—- 

100890 $fIIf CONSTANT CgPnt 
LOLO0- == 

10110 CODE 

LOLZ0 == 

10130 :Big ‚by $00 
10140 :Tiny „by #00 
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<6500 


£0608 


50/88 


50790 


So7FF 


Afb. 19.1. Screen mode 2 





111414 tii14t111 
en 
ahelatejapjaldhajehdde 


OKEE 
UIEN 
Aajt tjtd| 

falsjajee 


VUUR AAA 
UUUDAAAA 
UUUUAAAA 
UUUGAAAA 
UUUVAARA 
UUUUAARA 
VUUUAAAA 
UUYVAAAA 


VYLVAARA 
VUUUAAAA 
VUUUAAAR 
UYULVAARA 
VUUUAAAA 
UUUVAARA 
UUUVAARAR 
UUUUAAAR 


UUUVAARAA 
OMD 
76545210 





OE ! 


$1608 


51688 


s1re8 


$1798 


S1ZFF 





VUUVAAAR 
VUUVAAAA 
UUUDAAAR 
UUUVAAAA 
vUUUAAAA 
vUUYRAAA 
UUUUAAAA 
UUUYARAA 


VUUGAAAR 
VUUVAAAA 
VUUVAAAA 
UULUAAAR 
UYUUARAA 
UUYURAAA 
VvUUVAARA 
VUUVAAAA 


UVUUAAAR 
DODO 
76545210 
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dDio0 == 


10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
10270 
102380 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10330 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10480 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
30580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
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Buffer 
Game 
Info 


„wo $9000 
‚wo $3000 
.wo $6000 


VELEN 


Eee 


Up 


di 

call #FilVrm 
ei 

ret 


:RVMove 


di 

call #LDirVm 
el 

ret 


ld hì,#Big 
Hd AAL) 
ep HO 
retif z 
dea (hl) 
ret 


: Down 


‘Left 


Ìd hi,#Big 
ld a,(hl) 
cp H#240 
retif z 
ine (hl) 
ret 


Right 


ld ml,#Tiny 
dee (hl) 
ret 


id hl,#Tiny 
inc (hl) 
ret 


: ShowGame 


ìd a, (#Big) 
Id l,a 

Id h,#0 

sla Ì 

elR 

sla Ì 

el A 


10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10870 
10880 
10880 
109800 
10910 
10920 
10930 
10840 
10950 
10860 
10870 
10980 
10990 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
31160 
11170 


sla Ì 

rl h 

sla 

rl h 

sla Ì 

rl h 

Id be, (#Game) 
add hl,bc 

ld be, #$0200 
ld de,#$1800 
jp HRVMove 


:ShowInfo 


ld de, (#Buffer) 
ld hl, (#Info) 
ld a, (#Tiny) 

ld l,a 

ld c,#8 


:ShowInfoû 


Id b,#32 


:ShowInfol 


ld a, (hl) 

Id (de),a 

inc de 

inc Ì 

djna #ShowInfol 
inc h 

ld a, (#Tiny) 

id Ìl,a 

dee Cc 

jpif na, #ShowInfo0 
là be, #$0100 

ld de, #$1a00 

ìd hl, {(#Buffer) 
jp #RVMove 


Joy 


ld a,#0 
call #GHStck 
ld b‚a 
cp #1 
IF a 
THEN 

call #Up 
F1 
ld 
CP 
IF 


a,b 
#3 


2 
THEN 
call #Right 
FI 
ld a,b 


139 


11180 
11130 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
112380 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 
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cp #5 
IF z 
TEEN 
call #Down 
F1 
a,b 
cp #7 
IF à 
THEN 
call #HLeft 
FI 
call #ShowGame 
je #ShowInfo 


sImat 


call #IniGrp 

ld be, ##0800 

ld de, (#Buffer) 
ld hì, (#CgPnt+t1) 


:Init0 


push be 

push de 

Id a, (#CgPnt) 
call #RASIt 
pop de 

pop be 

ld (de),a 

inc de 

inc hÌ 

dee C 

jpif na,t&Init0 
dec b 

jpif na,kInit0 
ld be, #$0800 

ld de, #50000 
Id hì,(#Buffer) 
call #RVMove 
Id be, #$0800 
ld de, #8$0800 
ld hl, (#Buffer) 
call #RVMove 
ld be, #$0800 
ld de, #51000 
ld hl, (#Buffer) 
call #RYMove 
ld a,#%00111100 
id be, ##1000 
Id hl,#$2000 
call #VFill 

Id a,#%11110001 
ld be, #$0800 
ld hl,##£3000 


11700 
11710 
11720 
11730 
11740 


call #VFill 
:Init1 


call #IscNte 
call #Joy 
je #Init] 


ILro0 


11760 ENDCODE 


: COQO 
.: COO04 
.: CO08 
en WGO0E 
‚: CO1O 
.: CO14 
ee GOS 
ze COLG 
.: CO20 
s GO024 
.: CO28 
… GO2C 
„: CO30 
.…: CO34 
20048 
‚: CO3C 

: CO40 
‚…: CO44 

: CO48 
.: CO4C 
.: COBO 
16054 
‚… 6058 
-i GOOSE 
.: CO60 
.: CO64 
.: CO068 
.: COBC 
.: CO7O 
‚: CO74 

: CO78 
‚: CO7G 
ss CO80 
‚: COB4 

‚ CO88 


00 
00 
F3 
FB 
5C 
21 
FE 
C9 
7E 
34 
GO 
Ol 
3Â 
26 
CB 
CB 
CB 
CB 
CB 
04 
00 
18 
ED 
2Â 
O1 
08 
12 
FA 
CO 
65 
O1 
AN 
OE 


FE 


00 
30 
CD 
C9 
00 
O0 
00 
21 
FE 
C9 
35 
GO 
00 
00 
14 
14 
14 
14 
14 
CO 
02 
C3 
SB 
06 
CO 
06 
13 
24 
6E 
CO 
11 
02 
CO 
D5 
O1 


00 
00 
56 
F3 
FB 
CO 


00 
FO 
21 
C9 
34 
GO 
CB 
CB 
CB 
CB 
CB 
ED 
09 
Ll 
OE 
O2 
CO 
6F 
20 
20 
3À 
OD 
Ol 
00 
CO 
3E 
00 
C2 


90 
60 
00 
CD 
C9 
TE 
35 
CO 
C3 
Oi 
2 
C9 
GF 
25 
25 
25 
25 
25 
4AB 
Oi 
00 
GO 
CO 
SA 
Ok 
TE 
10 
Ol 
C2 
00 
1À 
C3 
00 
47 
90 


RNR RO: 


CO8C 
CO90 


CO94 


CO98 


‚ OSC 


COAO 


COA4 


COA8 


COAC 


COBO 


COB4 


COB8 


_COBC 


COCO 


‚_GOC4 


COCB 


GOGG 


CODO 


COD4 


CODE 


“: CODC 


COEBO 
COE4 


“: COES8 


COEC 


COFO 


COF4 


“: COF8 


COFG 


“+ €100 


C104 


‚1 C108 


C1OC 


+ C110 


C1i4 


CO 
78 
99 
CO 
C2 
1D 
07 

CD 
30 

CO 
O1 

DB 
20 

3Â 
OG 
12 
C2 

C2 
00 

00 

CD 
00 

08 
CD 
00 
10 
CD 
JC 
el 
08 
O1 
00 
CO 
CD 
OD 


CD 
FE 
CO 
78 
A2 
GO 
Cz 
2B 
CO 
CD 
00 
02 
FS 
iF 
00 
13 
BE 
BE 
08 
2Â 
OE 
08 
2Â 
OE 
08 
2Â 
OE 


00 
CO 
00 
30 
CD 
82 
C1 


14 
03 
CD 
FE 
CO 
78 
AB 
Co 
C3 
12 
08 
CO 
C5 
F9 
Di 
23 
Co 
Co 
il 
02 
Co 
ht 
02 
Co 
11 
02 
CO 


20 
3E 
08 
CD 
BÀ 
CO 
de 


CO 
Ce 
26 
05 
CD 
FE 
GO 
CD 
58 
00 
ED 
2Â 
D5 
CD 
C1 
OD 
05 
O1 
00 
CO 
01 
OO 
CO 
op 
00 
CO 
3E 
10 
CD 
F1 
Bl 
08 
00 
C3 
AT 
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CO08 
COO9 
COOC 
COOD 
COOE 
COOF 
CO12 
CO13 
CO14 
CO17 
CO18 
COLA 
CO1B 
CO1C 
CO1D 
CO20 
CO21 
CO23 
COZ4 
CO25 
CO26 
CO29 
CO2A 
CO2B 
COZE 
COZF 
CO 30 
CO33 
CO34 
CO 36 
CO38 
CO3A 
CO3C 
CO3E 
CO40 
CO42 
CO44 
CO46 
CO48 
CO4A 
CO4E 
CO4F 
CO52 
C055 
CO58 
CO5C 
CO5F 
CO62 
CO63 
CO65 
CO67 


F3 
CD 
FB 
C9 
F3 
CD 
FB 
C9 
2d 
7E 
FE 
C8 
35 
C9 
21 
TE 
FE 
C8 
34 
C9 
21 
35 
C9 
21 
34 
C3 
3A 
6F 
26 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
ED 
Og 
Oi 
11 
G3 
ED 
2 
3Â 
GF 
OE 
O6 
TE 


56 


5C 


00 


00 


00 
FO 


op: 


Oi 


00 


00 
25 
14 
25 
14 
25 
14 
25 
14 
25 
14 
4B 


00 
O0 
OE 
SB 
06 
Ol 


08 
20 


00 


00 


CO 


CQ 


CO 


CO 


CO 


04 


02 
18 
CO 
02 
CO 
CO 


CO 


CÔ 


DI 


CALL $0056 
EI 

RET 

DI 

CALL $005G 
EI 

RET 

LD HL,$COOO0 
LD A, (HL) 
CP $00 

RET Z 

DEC (HL) 
RET 

LD HL, $COO00 
LD A, (HL) 
CP SFO 

RET 2 

ING (HL) 
RET 

LD HL, $COO1 
DEC (HL) 
RET 

LD HL, $COO1 
INC (HL) 
RET 

LD A,‚($CO00) 
LD L‚ÀA 

LD H,$00 
SLA L 

RL H 

SLA L 

RL H 

SLA L 

RL H 

SLA L 

KL B 

SLA L 

Rl A 

LD BG, ($COO4) 
ADD HL, BC 
LD BC, $0200 
LD DE,$1800 
JP $COOE 


LD DE, ($CO02) 
LD HL, ($CO06) 
LD A, ($COO1) 
LD L,À 

LD C,$08 

LD B,$20 

LD A, (HL) 
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C068 
CO69 
CO6A 
CO6B 
CO6D 
COBE 
COT 1 
CO72 
CO73 
CO76 
CO79 
COT7C 
COTE 
CO82 
CO84 
COB7 
CO88 
COBA 
COSD 
GO90 
CO91 
CO93 
CO96 
CO99 
COA 
COIG 
CO9F 
COA2 
COA3 
COA5 
COA8 


COAB 


COAE 
COB1 
COB4 
COB7 
COBB 
COBE 
COBF 
COCO 
COC3 
COCB 
COC7 
COC8 
COC9 
COCA 
COCB 
COCG 
COCF 
CODO 
COD3 
COD6 


12 
5 
20 
10 
24 
3Â 
6E 
OD 
C2 
O1 
dek 
2Â 
C3 
3E 
CD 
47 
FE 
CZ 
CD 
Le 
FE 
G2 
CD 
78 
FE 
C2 
CD 
78 
FE 
C2 
CD 
CD 
C3 
CD 
O1 
ED 
2Â 
C5 
D5 
JÀ 
GD 
D1 
C1 
12 
13 
23 
OD 
C2 
05 
C2 
O1 
Lal: 


FA 


Ol 


65 
Q0 
OO 
02 
OE 
00 
D5 


O1 
80 
14 


03 
99 
26 


05 
AZ 
iD 


O7 
AB 
2B 
30 
58 
12 
O0 
5B 
20 


iE 
OC 


BE 


BE 
00 
00 


CO 


CO 
O1 
lÀÂ 
CO 
CO 


00 


CO 
CO 


CO 
CO 


CO 
CO 


CO 
CO 
CO 
CO 
00 
08 
02 
F9 


F9 
00 


CO 


CO 
08 
OO 


CO 


LD (DE),À 
INC DE 

ING L 

DJNZ @C067 
ING H 

LD A,‚($COO1) 
LD L,‚A 

DEC GC 

JP NZ,$C065 
LD BC, 50100 
LD DE, $1A00 
LD HL, ($COO2) 
JP $COOE 

LD A,$00 
CALL $O00D5 
LD B,À 

CP $01 

JP NZ,$CO90 
CALL $CO14 
LD A,B 

CP $03 

JP N4,$CO99 
CALL $CO26 
LD A,B 

CP $05 

JP N4,$COAZ 
CALL $COID 
LD A,B 

CP 807 

JP NZ, $COAB 
CALL $COZB 
CALL $CO30 
JP $CO58 
CALL $0072 
LD BC, $0800 
LD DE, ($COO2) 
LD HL, ($F920) 
PUSH BC 
PUSH DE 

LD A, (SESIF) 
CALL $000C 
POP DE 

POP BC 

LD (DE),A 
ING DE 

INC HL 

DEC C 

JP NA, $COBE 
DEC B 

JP N4,$COBE 
LD BC, 50800 
LD DE, $0000 
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COD9 ZA 02 CO LD BL, ($CO02) 


; CODC CD OE GO CALL BCOOE 
‚3 CODF O1 O0 08 LD BC,$0800 
.; COEZ 11 00 08 LD DE, 50800 
‚; COES5 2A 02 CO LD HL, ($COO2) 
.; COE8 CD OE CO CALL $COOE 
„> COEB O1 O0 08 LD BC, $0800 
‚; COEE 11 O0 10 LD DE, 81000 
„> COF1 24 O2 GO LD HL, ($C002) 
.; COF4 CD OE CO CALL $COOE 
‚‚ COF7 3E 3C LD A, $3C 
„3 COF9I O1 00 10 LD BC,$1000 
., COFC 21 O0 20 LD BL, $2000 
‚; COFF CD 08 CO CALL $CO08 
.; C102 3E F1 LD A,$F1 
‚, C104 O1 OO O8 LD BC, $0800 
.‚ C107 21 00 30 LD HL,$3000 
.; G10A CD O8 CO CALL $CO08 
‚…‚ C10D CD BA OO CALL $00BA 
.; C110 CD 82 CO CALL $CO82 
5 Gils GS OD OL JP $C1OD 
‚; C116 32 A7 FC LD ($FCA7),A 


De hires mode is de geschiktste scherm-mode voor spelprogrammering. Alle 
karakters zijn afzonderlijk te definiëren en ook met de kleurmogelijkheden is het 
prima in orde. Als voorbeeld krijgt u dan ook een spelprobleem. Probleem? Jawel, 
want bij spelletjes gaat het vooral om snelheid en beeldkwaliteit. Het liefst ook 
nog eens zoveel mogelijk schermen, u kent dat wel. 


We gaan wederom scrollen, maar op een totaal andere manier. Waar het in ons 
eerste programmeervoorbeeld van dit hoofdstuk om een ‘op het scherm’-scroll 
ging, gaan we nu vanuit het normale geheugen scrollen, en wel zo snel mogelijk. 
Stelt u zich eens een verticale pijp voor, met een breedte van 32 tekens en een lengte 
van 256 tekens. Aangezien de toegestane schermhoogte 16 tekens (twêe karakter- 
sets) gaat worden, kunnen we onmogelijk het hele speelveld laten zien. Het scherm 
fungeert als het ware als een venster waardoor we steeds één zestiende van het 
totale oppervlak kunnen bekijken. (Scrolten met de cursortoetsen) 

We nemen ook een horizontale pijp, met een breedte van 256 tekens en een hoogte 
van 8 tekens. De maximale breedte van een scherm is 32 tekens, dus ook hier 
moeten we scrollen, alweer met de cursortoetsen. 
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Door middel van een adresseringstruc worden de schermen uit het BASIC-ROM 
gekopieerd (zodat u iets ziet als u het de eerste keer probeert), maar het is uiteraard 
zeer eenvoudig om de bewuste pointers naar RAM te laten wijzen. RAM waar u 
zelf een mooi scherm kunt maken, met wellicht een zelfgeschreven editor? 


19.2 De routines op een rij 


VFILL vult een stuk videogeheugen met een door u bepaalde waarde. De accu- 
mulator bevat deze waarde. Het BC-registerpaar bevat de lengte, het HL-register- 
paar het beginadres. 


RVMOVE verplaatst een stuk gewoon geheugen naar hetvideogeheugen. in BC 
staat de lengte, in DE het beginadres van het videogeheugen en in HL het 
beginadres van het gewone geheugenblok. 


UP scrollt indien mogelijk omhoog. 
DOWN scrollt indien mogelijk omlaag. 
RIGHT scrollt indien mogelijk naar rechts. 
LEFT scrollt indien mogelijk naar links. 


SHOWGAME laat een gedeelte van de verticale pijp op het scherm zien; het 
speelveld zullen we maar zeggen. 

Het beginadres wordt met een ‘maal 32’-berekening en een eenvoudige offset- 
optelling naar HL gecalculeerd. Als dit geheugenadres eenmaal is gevonden, volgt 
een razendsnelle BIOS-kopieerroutine. 


SHOWINFO laat een gedeelte van de horizontale pijp op het scherm zien, laten 
we zeggen het informatieve gedeelte. (Tellers en zo...) 

Nu moet u het high-byte en het low-byte even afzonderlijk bekijken. In het low- 
byte plaatsen we steeds de horizontale begin-pointer. In het high-byte komt het 
pagina-adres van de lijn die op dat moment aan de beurt is. 

Tijdens het naar de buffer kopiëren van een horizontale lijn verhogen we alleen het 
low-byte (L), voor de volgende lijn verhogen we het high-byte (H). 

We kopiëren niet meteen naar het scherm in verband met snelheidsverlies. Een 
RVMOVE-routine is altijd VEEL sneller dan afzonderlijk ‘ge-poke’. 
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JOY kijkt naar de cursortoetsen en verandert de scherm-pointers indien noodza- 
kelijk. 


INIT zet het scherm in de hires mode en gaat vervolgens de karakterset uit het 
ROM kopiëren. Eerst naar een buffer, om vervolgens diezelfde karakterset 3 keer 
naar het videogeheugen weg te zetten. 

Met de VFILL-routines zorgen we voor de juiste karakterkleuren op de juiste 
plaatsen. 
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20 Multi Color 


De veel kleuren-mode dus. Een verschrikkelijk ondoorzichtige scherm-mode (zie 
afb. 20.1), iets dat veel programmeurs afschrikt. Het enige dat u doet, is blokjes op 
het scherm zetten. 64 x 48 blokjes, zo u wilt met ieder een eigen kleur. 





111tditddiiitti 
6125456 789ABCDEFB12345678IABCDEF 

50806 EEERE III) & - 9,1 (a) 
50828 ||| DELEN Ed LL — 2,3 Cb} 
sa840 OEE TILL) 2 —- 4,5 (Cc) 
sA856 EEn | | Hr 0 3 -— 6,7 td) 
$08368 OE OT OL O4 - 9.1 ta) 
SBEAD bee | 5 — 2,3 Cb) 
s08CH HE aans 6 — 4,5 (cd 
SBBEG IT OE Ì 7 -— bB,7 Cd} 
2008 tr dd 8 - 515 Ed 
Soes HEE EEE Ed ö 2 45 to 
$0966 EEH PEELEN il) 4 — 6,7 Ed) 
4938 REDEEE ed heteen DT 2 — @,1 Ca) 
Sûn EEE ENT 5 = 2,5 tb) 
sasce (UU PELLET NDT DDI dà — 4,5 Ec) 
S89EB [TI LENT O3 — 6-7 Cd) 
5BADB II rt OE | 6 — 8,1 kad 
58A28 | EHEER 7 =— 2,5 £b) 
sBA4a OEELILIEEIEIIA LEL 8 — 4,5 Ec} 
$9AGB | un Î en ete 3 =— 6,7 Cd) 
s0A8G LT DT 8 — 6,1 Ca) 
20aad | LE OO } = 23 Cb) 

| _ mi c 
SOAEG EEE HEEE | 3 -— 6,7 Cd) 


56000 AKAABBEB -— 8 
ellen 1 
de 
EERDE 3 te 88801111 
De Ren 
s0808 .…....... GG6A1111 BO081111 
Bio nise 22223333 22223333 
venen: 22225555 
$0788 AAAABBBB - 6 2225353 
EE in ne 
Bn hs 
Kk 2 
OoooPPPP - 7 2 td 
50798 
S87FF 
OOOODDDD 
76545218 


Afb. 20.1. Screen mode 3 
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In deze ‘veel kleuren'-mode neemt de schermtabel 768 ( = 32 x 24) bytes in 
beslag. Het scherm bestaat uit een rooster van 32 bij 24, in het videogeheugen 
beginnend op $0800. 

De karakterset (beter is: ‘kleurenset’) begint op $0000 en loopt tot $07FF. In deze 
kleurenset zit ‘m de grap. Twee bytes zijn namelijk voldoende omeen 8 x 8 blokje 
in te kleuren. Slim als de MSX-computer is, gebruikt hij de eerste twee bytes uit 
zo’n (normaal is de karakterlengte 8) kleurenkarakter voor de O-regels, de tweede 
twee bytes zijn voor de l-regels, de derde twee bytes voor de 3-regels en de vierde 
twee bytes tot slot zijn voor de 4-regels. 

Even terug naar dat 8 x 8-blok. In zo’n 8 x 8-blok zit in feite een viertal 4 x 4- 
pixels (‘bixels’ in dit geval, want ze zijn een stuk groter) geadresseerd door twee 
bytes. Het high-nybble van het eerste byte zorgt voor het 4 x 4-bixel linksboven, 
het low-nybble van het eerste byte zorgt voor het 4 x 4-bixel rechtsboven, het 
high-nybble van het tweede byte zorgt voor het 4 x 4-bixel linksonder en het low- 
nybble van het tweede byte zorgt voor het 4 x 4-bixel rechtsonder. 

Sprites zijn toegestaan. De attributentabel begint op $1B00 en de patroontabel 
begint op $ 3800. 


20.1 Over lichtorgels 


10000 ORIGIN ($c000) 
10010 -- 


10020 
10030 
10040 
10050 
10060 
10070 
10080 
10090 
10100 
10110 
10120 
10130 
10140 
10150 
10160 
10170 
10180 
101390 
10200 
10210 
10220 
10230 
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$004a 
$004d 
$0056 
$0062 
50075 
$00ba 
$00d5 
$00d8 
sf Jeg 
$fJea 
$fJeb 


CODE 


Teller 


:Xpos 
‘Ypos 


‚Positie 


:VPeek 


di 


CONSTANT 
CONSTANT 
CONSTANT 
CONSTANT 
CONSTANT 
CONSTANT 
CONSTANT 
CONSTANT 


CONSTANT 
CONSTANT 
CONSTANT 


RdV rm 
WrtVrm 
FilVrm 
ChaCir 
IniMlt 
IseNte 
GEStck 
GrTrig 


Forùìr 
BacGlr 
BdrClr 


‚by #00 


„by #00 
‚by £00 


‚wo $0000 


10240 
10250 
10260 
10270 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10390 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 
10640 
10650 
10650 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 


call #RdVrm 
ei 
ret 


: VPoke 


di 
call HWrtVrm 
ei 
ret 


:VEill 


di 
call #FilVrm 
ei 
ret 


CurPos 


id hì,#&Xpos 
ld a,#0 

ld b‚a 

Id a, (#Ypos) 
sla a 

el B 

sla a 

rì b 

sla a 

rì b 

sla a 

rl b 

sla a 

rl b 

or (hl) 

ld l,‚a 

id a,b 

ld h‚b 

ld be, #$0800 
add hl,be 
ld a,#15 

jp #VPoke 


;Plot 


ld a,#i4 
jep #VPoke 


Cycle 


ld be, #$0300 
ld hl,#$0800 


‘Cyclel 


call #VPeek 
cp #0 
IF na 
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10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10850 
10860 
10370 
10880 
10890 
10900 
10910 
10920 
10930 
10840 
10950 
10960 
10970 
10980 
10930 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
11160 
11170 
11180 
11190 
11200 
11810 
11220 
11230 
11240 
11250 


dec a 
call #VPoke 
FI 
inc hl 
dee e 
jpPif na,#Cycaleû 
dec b 
jpif nz,#Cycleû 
ret 
: Boing 


‘Up 


call #CurPos 

ld be, #$0020 

ld (#Positie),hl 
or a 

sbo hl,bce 

call #Plot 

ld hl, (#Positie} 
dec hl 

call #Plot 

inc hì 

ine hìÌ 

call #Plot 

ld hi, {({#Positie) 
add hì,bc 

je #Plot 


id a, {(#Ypos) 
cp #1 

retif z 

dec a 

ld (#Ypos),a 
ret 


Right 


ld a, (#Xpos) 
cp #30 

retif z 
inca 

ld (#Xpos),a 
ret 


: Down 


t1280 == 


150 


ld a, (#Ypos) 
cp HZ2 

retif z 

inc a 

ld (#Ypos),a 
ret 


11270 
11280 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
11390 
11400 
11410 
11420 
13430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 
11680 
11690 
11700 
11710 
11720 
11730 
11740 
11750 
11760 
11770 
11780 


Left 


ld a, {(#Xpos) 


CP 


#1 


retif az 
dec a 


ld 


(#Xpos),a 


ret 


‚Joy 
ìd 


a, #0 


call #GtStcek 


1d 
CP 
IF 


FI 
ìd 
CP 
IF 


FI 
ld 
CP 
IF 


FI 
ld 
CP 
IF 


FI 
ld 
CP 
IF 


FI 
id 
CP 
IF 


FI 
ld 
CP 


b‚a 
#1 


2 
THEN 
call 


a,b 
#2 


ä 
THEN 
call 
call 


a,b 
#3 


2 
THEN 
call 


a,b 
F4 


2 
THEN 
calì 
call 


a,b 
#5 


2 
THEN 
call 


a,b 
#5 
2 
TEEN 
call 
call 


a,b 
#7 


#HUp 


EUp 
#Right 


HRight 


ERight 
#HDown 


HDown 


EDown 


HLeft 
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11790 
11800 
11810 
11820 
11830 
11840 
11850 
11860 
11870 
11880 
11830 
11900 
11910 
11920 
11930 
11940 
11950 
11960 
11870 
11980 
11990 
12000 
12010 
12020 
12030 
12040 
12050 
12060 
12070 
12080 
12090 
12100 
12110 
12120 
12130 
12140 
12150 
12160 
12170 
12180 
12190 
12200 
12210 
12220 
12230 
12240 
12250 
12260 
12270 
12280 
12290 
12300 
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IF z 
THEN 
call #Left 
FI 
ld a,b 
cp #8 
IF z 
THEN 
call #Left 
call #Up 
FI 
ld a,#0 
call #FGtTrig 
cp HEEL 
jpif a,t#Boing 
ret 


„Init 


call #IniMlt 
ld a,#0 

ld (#Teller),a 
ld hl, #$0000 


:Initû 


ld a, (#Teller) 
ld b‚a 

sla b 

sla b 

sla b 

sla b 

or Db 

ld b, #8 


:Initi 


call #VPoke 
ine hl 

djna #Initl 

ld a, (#Teller) 
inc a 

ld (#Teller),a 
cp #16 

jdpPif nas,t#Init0 
ld a, #0 

ld be, #$0300 
id hl,#$0800 
call #VFill 

ld a, #1 

ld (#ForClr),a 
ld (#BacClr),a 
ld (#BdrClr),a 
ld (#Xpos),a 
ld (#Ypos),a 
call #ChgaCìr 


‘Init2è 


12310 
12320 
12330 
12340 
12350 


call #IscNtce 


call #CurPos 
call #Cycle 


calì #HJoy 
je #Finit2 


Ledh0 == 


12370 ENDCODE 


ss GOOO 
…: COO4 
.: COO08 
.…: GOOG 
Re GOD 
: CO14 
: CO18 
GONE 
CO20 
.…: COZ4 
: CO28 
„… CO2C 
s: CO30 
ae GOIA 
.…: CO38 
de GOE 
.: CO40 
…: CO44 
.: CO43 
ae GOAG 
zn COO0 
a GO54 
ze CO58 
s GOBE 
: CO60 
: CO64 
oe OBS 
RE OBE 
: CO70 
: CO74 
. CO078 
„: GO7C 
.: CO80 
‚…: CO84 
. CO88 
: CO8C 
.: CO90 
.: CO94 
.: CO98 
GIOS 


00 
00 
00 
CD 
cg 
00 
01 
47 
CB 
CB 
CB 
CB 
CB 
B6 
01 
3E 
CO 
0B 
03 
CD 
00 
3D 
23 
CO 
CO 
Co 
22 
ED 
CO 
2B 
23 
CO 
09 
3A 
01 
02 
01 
C8 
CO 
co 


00 
F3 
FB 
4D 


FB 
CO 
3Â 
Bf 
27 
27 
27 
27 
GF 
00 
OF 
3E 
CO 
21 
05 
CA 
CD 
OD 
05 
C9 
Ol 
03 
42 
ZA 
CD 
23 
2Â 
C3 
O2 
C8 
CO 
CO 
3C 
Cg 
FE 


00 
CD 
G9 
00 
CD 
CJ 
3E 
02 
CB 
CB 
CB 
CB 
CB 
78 
08 
C3 
OE 
O1 
00 
CO 
58 
OB 
GE 
C2 
CD 
20 
CO 
CD 
03 
41 
CD 
03 
41 
CO 
3D 
C3 
FE 
32 
3Â 
16 


0Û 
AA 
F3 
FB 
56 
21 
0Û 
CO 
10 
10 
10 
10 
10 
60 
O9 
OB 
C3 
00 
08 
FE 
CO 
CO 
4G 
AG 
7 
00 
B7 
41 
GÛ 
CO 
41 
CO 
CO 
FE 
32 
SA 
1E 
Ol 
02 
Ca 


# 
ne Dd a _ we Oe 4 _ 
u Di 


COÂO 


: COA4 


COA8 
COAG 
COBO 


_COB4 


COB8 


COBG 


COCO 


COC4 


COC8 


‚_cOCC 


CODO 


‚CODA 


COD8 


“s CODC 


COEO 
COE4 


COES8 


COEG 


COFO 


COF4 


: COFS 


COFG 


‚1 C100 


C104 


ss C108 


C10G 


C110 


C114 


C118 


C11C 


in GZO 


C124 
C128 
C12C 


C130 


C134 


… C138 


C13C 


3C 
Cg 
FE 
32 
3E 
00 
Ge 
84 
02 
CD 
8E 
03 
CD 
FE 
CO 
CD 
FE 
CO 
(8 
F4 
CO 
78 
FD 
CO 
C2 
Â5 
CO 
Ds 
CA 
CD 
00 
21 
00 
20 
20 
06 
CO 
3A 
32 
10 


32 
3Â 
OT 
Ol 
00 
47 
BE 
CO 
C2 
84 
CO 
Ce 
8F 
04 


A 
05 
CD 
FE 
CO 
CD 
FE 
CO 
18 
09 
CO 
JE 
OO 
62 
75 
32 
00 
GO 
CB 
CB 
08 
23 
00 
00 
C2 


02 
O1 
C8 
CO 
CD 
FE 
CO 
18 
CA 
CO 
78 
D3 
GO 
C2 
oF 
CO 
C2 
9Â 
06 
CD 
ÂS5 
07 
CD 
FE 
C1 
CD 
0û 
FE 
CO 
ÒO 
OO 
00 
47 
20 
20 
CD 
10 
CO 
CO 
LF 


CO 
CO 
3D 
C9 
D5 
O1 
CD 
FE 
CO 
GD 
FE 
CO 
78 
DF 
CO 
78 
3 
CO 
C2 
A 
CO 
or, 
A5 
08 
CD 
84 
CD 
FE 
C9 
3E 
CO 
3Â 
CB 
CB 
BO 
ÒB 
FA 
30 
FE 
Cl 
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: C140 


C144 


C148 


C14C 


“: C150 
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C154 


CO05 
COO6 
COO9 
COOA 
COOB 
GOOG 
COOF 
CO10 
CO11 
CO12 
CO15 
CO15 
CO17 
CO1A 
COIG 
CO1D 
CO20 
CO22 
CO24 
CO26 
CO28 
COZA 
GOZG 
COZE 
CO30 
CO32 
CO34 
CO35 
CO36 
CO37 
CO38 
CO3B 
CO3G 
CO3E 
CO41 
CO43 
CO46 
CO49 
CO4G 
COAF 
COSÌ 
CO54 


3E 
03 
CD 
O1 
32 
EB 


F3 
CD 
FB 
C9 
F3 
CD 
FB 
C9 
F3 
CD 
FB 
C9 
21 
3E 
AT 
3Â 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
CB 
B6 
OF 
18 
60 
O1 
O9 
3E 
C3 
3E 
C3 
O1 
21 
CD 
FE 
CA 
3D 


00 
21 


32 
EA 
FS 


4A 


4D 


56 


O1 
00 


02 
2 
10 
27 
10 
27 
10 
27 
10 
7 
10 


00 


OF 
OB 
OE 
OB 
00 
00 
05 
00 
58 


O1 
00 
CO 
Eg 
F3 
32 


Oo 


00 


0Û 


CO 


CO 


08 


CO 


Co 
03 
08 
CO 


CÔ 


ers 
08 
3E 
F3 
32 
O1 


DEET si C158 CO 32 02 CQ “sss” 
dh den .…: C15C CD B2 OO CD ‚b.‚.” 


EN .: C160 BA O0 CD 17 bn 
Ee „: C164 CO CD 46 CO "‚.E,‚” 
EN :s GI6GB CD BO CO CI Pora” 
bes” „: C16C SF Ci 44 CO “_.D.” 


DI 

CALL $004A 
EI 

RET 

DI 

CALL SO004D 
EI 

RET 

DI 

CALL $0056 
El 

RET 

LD BL,$COO1 
LD A,$00 

LD B,À 

LD A, ($CO02) 
SLA A 

RL B 

SLA A 

RL B 

SLA A 

RL B 

SLA A 

RL B 

SLA A 

RL B 

OR (HL) 

LD L‚A 

LD A,B 

LD H‚B 

LD BCG, $0800 
ADD HL,BG 
LD A,$O0F 
JP $COOB 

LD Á,$0E 
JP $COOB 

LD BC,$0300 
LD BL, 50800 
CALL $COO5 
CP 800 

JP 2,$C058 
DEC A 


: ’ ú . - - - + - r 1 t a Ĳ a - a r r . . a . 8, * - D] „ . - . e m * n * . „ . Ee . u F a kel . 
* 
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COS5 
CO58 
CO59 
COSA 
COSD 
COSE 
CO61 
CO62 
CO65 
CO68 
CO6B 
CO6G 
CO6E 
CO71 
CO74 
COT75 
CO78 
COT79 
CO7À 
COT7TD 
COBO 
CO81 
CO84 
CO87 
CO89 
CO8A 
CO08B 
CO8E 
COBFE 
CO9Z 
CO94 
CO95 
CO96 
CO93 
CO9A 
CO9D 
CO9F 
COAO 
GOAI 
COA4 
COA5 
COA8 
COAA 
COAB 
COAC 
COAF 
COBO 
COB2 
COB5 
COB6 
COB8 
COBB 


CD 
23 
OD 
C2 
05 
C2 
Cg 
CD 
Wid 
22 
B7 
ED 
CD 
2Â 
2B 
CD 
23 
23 
CD 
IN 
09 
C3 
3Â 
FE 
C8 
JD 
32 
Cg 
3À 
FE 
C8 
3C 


C3 
JA 
FE 
C8 
3C 
32 
C9 
3Â 
FE 
C8 
3D 
32 
CJ 
3E 
CD 
47 
FE 


CD 


OB 


AC 
AC 
17 
20 
03 
42 
41 
03 
41 
Al 
03 
A1 
02 
01 
02 
O1 
1E 
O1 
02 
16 
02 
O1 
01 
O1 


00 
D5 


Ot 
BE 
84 


CO 


CO 
GO 
CO 


00 
CO 


CO 
CO 
CO 
CO 
CO 


CO 
CO 


CO 
CO 


GO 
CO 


CO 


CO 


CO 


00 


CO 
CO 


CALL $COOB 
INC HL 

DEC C 

JP NZ, 8CO4C 
DEC B 

JP NZ, $CO4C 
RET 

CALL $CO17 
LD BG, $0020 
LD ($COOS),HL 
OR A 

SBC HL,BC 
CALL $CO41 
LD HL, ($COO0O3) 
DEC HL 

CALL $CO41 
INC HL 

INC HL 

CALL $CO41 
LD HL, ($COO3) 
ADD HL,BC 

JP $CO41 

LD A,‚($CO02) 
CP $01 

RET 2 

DEC A 

LD ($CO02),A 
RET 

LD A, (5COOI) 
CP $1E 

RET 2 

INC A 

LD ($COO1),A 
RET 

LD A, ($COO2Z) 
CP $16 

RET Z 

INC À 

LD ($COO2),A 
RET 

LD A,($COO01) 
CP $01 

RET Z 

DEC A 

LD ($COO1),A 
RET 

LD A,$00 
CALL $00D5 
LD B,A 

CP $01 

JP NZ, $COBE 
CALL $CO84 
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COBE 
COBF 
COCI 
COC4 
COCT 
COCA 
COCB 
COCD 
CODO 
COD3 
COD4 
COD6 
COD9 
CODG 
CODF 
COEO 
COE2 
COES 
COE8 
COE9 
COEB 
COEE 
COF1 
COF4 
COF5 
COFT 
COFA 
COFD 
COFE 
C100 
C103 
C106 
C109 
C10B 
C10E 
C110 
C113 
C114 
Cil7 
CII9 
C11C 
CIiF 
C122 
C123 
C125 
C127 
C1293 
C12B 
C12C 
C12E 
CAL 
C132 


78 


Ce 
CD 
CD 
18 
FE 
C2 
CD 
18 
FE 
C2 
CD 
CD 
78 
FE 
Cz 
CD 
18 
FE 
C2 
CD 
CD 
78 
FE 
Cz 
CD 


FE 
C2 
CD 
CD 
3E 
CD 
FE 
CA 
C9 
CD 
3E 
32 
21 
JÂ 
477 
CB 
CB 
CB 
CB 
BO 
06 
CD 
a3 
10 


02 
CA 
84 
SF 


03 
D3 
8E 


04 
DF 
SF 
SA 


05 
E8 
JA 


06 
F4 
DA 
Á5 


07 
FD 
A5 


08 
09 
A5 
B4 
00 
D8 
FF 
62 


15 
00 
00 
00 
OO 


20 
20 
20 
20 


O3 
OB 


FA 


CO 
CO 
CO 


CO 
CO 


CO 
CO 
CO 


CO 
CO 


CO 
CO 
CO 


CO 
CO 


C1 
CO 
CO 
00 
CO 
00 
CO 


00 
GO 


CO 


LD A,B 

CP $02 

JP NZ, $COCA 
CALL $CO84 
CALL $CO8F 
LD A,B 

CP 503 

JP NZ,$COD3S 
CALL $CO8F 
LD A,B 

CP $04 

JP NZ,$CODF 
CALL $CO8F 
CALL $CO9A 
LD A,B 

CP $05 

JP NZ, $COES 
CALL $COS9A 
LD A,B 

CP $06 

JP NZ,$COF4 
CALL $COSA 
CALL $COAS 
LD Á,B 

CP $07 

JP NA, SCOFD 
CALL $COA5 
LD A,B 

CP $08 

JP NZ,$C109 
CALL $COAS 
CALL $CO84 
LD A,$00 
CALL $0O0DB 
CP &FF 

JP 4£,$C062 
RET 

CALL $0075 
LD A,$00 

LD ($COOO),A 
LD HL, $0000 
LD A, ($CO00) 
LD B,Á 

SLA B 

SLA B 

SLA B 

SLA B 

OR B 

LD B,508 
CALL $COOB 
ING HL 

DJNZ @C12E 


C134 3A 00 CO LD A, ($CO00) 


s C137 3C INC A 
.; C138 32 00 CO LD ($CO00),A 
; C13B FE 10 CP $10 
5 Old GA AF :GE JP NZ,SCIIF 
‚ C140 3E O0 LD A,‚$00 
… C142 O1 00 09 LD BC, 50300 
‚ C145 21 OO 08 LD HL, $0800 
5 C148 CD 11 CO CALL $CO11 
.; C14B 3E O1 LD A,‚501 
.; C14D 32 EI F3 LD ($F3E9),A 
‚; C150 32 EA F3 LD ($F3EA),A 
… CI53 Je EB H3 LD (SFS3EB), A 
‚> C156 32 O1 CO LD ($COO1),A 
.; C1539 32 02 CO LD ($COOZ),À 
.… C15C CD 62 OO CALL $0062 
.; C1iSF CD BA OO CALL $OOBA 
.; C162 CD 17 CO CALL $CO17 
.: C165 CD 46 CO CALL $CO46 
‚> C168 CD BO CO CALL $COBO 
s C16B C3 SF Cl JP $C1SF 
‚ C16E 44 LD B,H 


Deze veel kleuren-mode gilt om een veel kleuren-voorbeeld. Helaas heeft de 
MSX1 maar 15 verschillende kleuren, dus daar moeten we het dan maar mee 
doen. Zwart als achtergrond knalt altijd. Blijven er nog veertien kleuren over voor 
de effecten. We gaan namelijk een lichtorgel maken. 

Het principe is heel simpel: De kleuren verlagen tot transparant is bereikt. We 
maken 16 verschillende karakters, met zwart als achtergrond en als karakter 0. 
Als er een groter dan O-karakter (dus een kleur) op het scherm staat, verlagen we 
deze met één. 

In de tussentijd kunt u met de cursortoetsen aan het wandelen slaan, waarbij de 
spatiebalk voor een effect zorgt. Zien is geloven. Bekijk dit effect ook eens in een 
volledig verduisterde kamer.… 


20.2 De routines op een rij 
VPEEK, het video-adres in HL, en na terugkeer staat de data in de accumulator. 


VPOKE, het video-adres in HL, de data in de accumulator. 
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VFILL vult een stuk videogeheugen met een door u bepaalde waarde. De data in 
de accumulator, de lengte in BC en het beginadres van het videogeheugen in HL. 


CURPOS vindt een 16 bits-adres dat bij de X- en de Y-waarde van de cursor 
hoort. Het adres is het brandpunt van de routine. 


PLOT plaatst een brandpunt min l-waarde op het scherm. 


CYCLE is de routine die het scherm afzoekt op waarden groter dan nul. Zo ja, dan 
wordt de waarde verlaagd en teruggeplaatst. 


BOING verzorgt het effect. Uitgaande van het brandpunt wordt rondge-'"PLOT'. 
UP verplaatst het brandpunt indien mogelijk naar boven. 

RIGHT verplaatst het brandpunt indien mogelijk naar rechts. 

DOWN verplaatst het brandpunt indien mogelijk naar beneden. 

LEFT verplaatst het brandpunt indien mogelijk naar links. 


JOY leest de joystick (cursortoetsen) uit en onderneemt actie. Tot slot wordt naar 
de vuurknop gekeken voor een eventuele BOING. 


INIT initialiseert het scherm naar ‘veel kleuren’-mode. Er worden zestien kleuren- 


karakters aangemaakt, van transparant tot en met wit. Het scherm wordt gewist, 
nieuwe schermkleuren worden ingesteld en de hoofdroutine treedt in werking. 
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21 Sprites dus 


De videochip is in staat om 32 verschillende sprites tegelijkertijd op het beeld te 
plaatsen. Sprites staan altijd vóór de achtergrond en er kunnen er maar 4 tegelijk 
naast elkaar staan. Elke volgende verdwijnt automatisch. 

Om de sprites aan te sturen, bestaat er een speciale sprite-attributentabel (zie afb. 
21.1) die vijf ingangen bevat. 

Eerst de verticale- of Y-positie waarin een waarde tussen 0 en 255 de hoogte op het 
scherm aangeeft. 

Ten tweede de horizontale- of X-positie, wederom een waarde tussen 0 en 255 
voor de breedte op het scherm. 

Ten derde een wijzer naar de patroontabel. Vanaf het geadresseerde videogeheu- 
gen wordt de sprite-vorm opgehaald. (Zie figuur.) 

Het vierde byte zorgt voor de sprite-kleur (0-15) EN een zogenaamd early clock 
bit. Dit (zevende) bit zorgt ervoor dat de sprite 32 extra naar links wordt gezet. 











Sprite } pen Vorm 9 
benseitie £1B60 
X-positie S1B81 
Vormnunmer | S1B02 
/ d | 
darten EC Kleurcode s1B83 
YV-pasitie SLB44 
$1805 Vorm 128 
Vormnunner $1B06 
EC / Kleurcode S1IBD? 
Vorm 255 
Sprite Al pon 
Y-paositie SIBFC 
Vormnumner | SIB7E 
EC / Kleurcode SIBfF 





mn nn 





Afb. 21.1. Sprites op het beeld 
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In de VDP-registers bevinden zich ook nog een aantal speciale sprite-bits. In 
VDP-register 1 zorgt bit 0 voor de sprite-grootte: 0 = normaal/ l = vergroot. 
In hetzelfde register zorgt bit 1 voor de sprite-maat. Zie de betreffende figuur in 
verband met het nu te gebruiken vormnummer. (0 = 8 x8/1 = 16 x 16) 


Sprite 1 


Sprite 2 


Sprite 35 


Sprite 4 





Afb. 21.2. Sprites ‘uitvergroot 


21.1 Sprites ontwerpen 


10000 ORIGIN ($c000) 
HPL Te 

10020 $0047 CONSTANT WrtVDP 
10030 $004a CONSTANT RdVrm 
10040 $004d CONSTANT WrtVrm 
10050 $0056 CONSTANT FilVrm 
10060 $005c CONSTANT LDirVM 
10070 $008f CONSTANT Init32 
10080 #OO9Ff CONSTANT ChGet 
1900890 $00a2 CONSTANT ChPut 
10100 $00ba CONSTANT IscNte 
10110 $0156 CONSTANT KilBuf 
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10120 
10130 
10140 
10150 
10160 
10170 
10180 
10190 
10200 
10210 
10220 
10230 
10240 
10250 
10260 
tU2r0 
10280 
10290 
10300 
10310 
10320 
10330 
10340 
10350 
10360 
10370 
10380 
10380 
10400 
10410 
10420 
10430 
10440 
10450 
10460 
10470 
10480 
10490 
10500 
10510 
10520 
10530 
10540 
10550 
10560 
10570 
10580 
10590 
10600 
10610 
10620 
10630 


$fJaf 
sf Idd 


CONSTANT Lin32 


CONSTANT 


CrsX 


BfIde CONSTANT CrsY 


$f3el CONSTANT RglSav 
feat CONSTANT EseCnt 
CODE 
‚Help .by #00 
Teller ‚by #00 
Positie wo $0000 
StUEF ‚by 10,140,0,0 
xby 10,160,0,1 
„Dy 10,180,0,2 
sbr 10, 200.073 
‚by 30,140,0,4 
sby 30,160,0,5 
‚by 30,180,0,6 
‚by 30,200,0,7 
‚by 50,140,0,8 
‚by 50,160,0,9 
‚by 50,180,0,10 
.by 50,200,0,11 
‚by 70,140,0,12 
.by 70,160,0,13 
.by 70,130,0,14 
‚by 70,200,0,15 
‘VPeek 
di 
call #RdVrm 
ei 
ret 
‚ VPoke 
di 
call #WrtVrm 
ei 
ret 
‚VFill 
di 
call #FilYrm 
ei 
ret 
: RVMove 
di 
call #LDirVM 
ei 
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10640 
10650 
10660 
10670 
10680 
10690 
10700 
10710 
10720 
10730 
10740 
10750 
10760 
10770 
10780 
10790 
10800 
10810 
10820 
10830 
10840 
10950 
10860 
10870 
10880 
10890 
10900 
10910 
10920 
10930 
103940 
10950 
10960 
10970 
10980 
10890 
11000 
11010 
11020 
11030 
11040 
11050 
11060 
11070 
11080 
11090 
11100 
11110 
11120 
11130 
11140 
11150 
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ret 


:GetPos 
ld a, #0 
ld b‚a 
id a, {(#Teller) 
ld c‚a 
sla c 
rl b 
sla c 
rl b 
sla e 
rl b 
sla c 
rl b 
sla c 
rl b 
Ìd hì,#$3800 
add hì,bc 


ld (#Positie),hl 


ret 


me Sri 


'Hieht 

ld a, (#CrsY) 
:Hightô 

cp #1 

retif az 


ld de, (#Positie) 


inc de 


ld (#Positie),de 


dec a 
jp #Hight0 


: Width 

Id a, (#CrsX) 
cp #9 

retif cs 


ld hl, (#&Positie) 


ld de, #$0010 
add hl,de 


ld (#Positie), hl 


ret 


GetbLin 
call #Hight 
jp HWidth 


‘GetCol 

ld a, (#Crsi) 
dec a 

and #7 

ld b,#128 


11160 
11170 
11180 
11190 
11200 
11210 
11220 
11230 
11240 
11250 
11260 
11270 
LiZ50 
11290 
11300 
11310 
11320 
11330 
11340 
11350 
11360 
11370 
11380 
113390 
11400 
11410 
11420 
11430 
11440 
11450 
11460 
11470 
11480 
11490 
11500 
11510 
11520 
11530 
11540 
11550 
11560 
11570 
11580 
11590 
11600 
11610 
11620 
11630 
11640 
11650 
11660 
11670 


:GetCol0 


cp #O 

retif az 

srì pb 

dec a 

jp HGetCol0 


‘Part 


ld d,#8 


 Part0 


ld e,‚,#8 

push hl 

ld hl, (#Positie) 
call #VPeek 

tno hl 

ld (#Positie),hl 
pop hl 

id b,#129 


Part] 


id (#Help),a 
and b 
IF 2 
THEN 
ld a,#196 
ELSE 
id a,#219 
FI 
call #VPoke 
ina hÌ 
srì b 
ld a, {(#Help) 
dec @ 
jpif nz,Parti 
ld bc, #50018 


add hl,bce 
dec d 
jeif nz, tPartû 
ret 
Setup 


call #GetPos 
ld hl,#$1800 
call #Part 
id hl,#$1900 
call #Part 
ld hì,#$18083 
call HPart 
Id hl,##1908 
call #Part 
ret 


‚Plus 
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11680 
11690 
11700 
11710 
11720 
11730 
11740 
11750 
11760 
11770 
LEGO 
11780 
11800 
11810 
11820 
11830 
11840 
11850 
11860 
11870 
11880 
11890 
11800 
11910 
11920 
11930 
11840 
11850 
11960 
11970 
11980 
11990 
12000 
12010 
12020 
12030 
12040 
12050 
12060 
12070 
12080 
12090 
12100 
12110 
12120 
12130 
12140 
12150 
12160 
12170 
12180 


Ìd hl,#Teller 
inc (hl) 


: MakeOk 


ld a,fhl) 
and #63 

ld (hl),a 
sla a 

sla a 

ld b,‚,#16 

là hìl,#$1b0ë 


‚ MakeOkO0 


—_t 


call #VPoke 
inc hl 

inc hl 

inc hl 

ince hì 

djna HMakeOk0 
ret 


Min 


ld hl,#Teller 
dec (hl) 
Jp HMakeOk 


: Up 


ld a, {(#CrsY) 
cp Hi 

retif a 

ld a,#$le 

jep #ChPut 


: Down 


ld a, (#OörsY) 
cp #16 

retif z 

id a,#$if 
jp HChPut 


‘Left 


12190 == 
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ld a, (#CrsX) 
cp #1 

retif a 

ld a,#$1id 

je #HChPut 


Right 


Id a, (#CrsÄ) 
cp #16 

retif z 

Id a,t#$ic 
jp HChPut 


12200 : Home 

12210 call #GetPos 
12220 ld a,#0 

12230 id be, #$0020 
12240 ld hl, (#Positie) 
12250 jp #VFill 

12260 —- 

12270 :Invert 

12280 call #GetPos 
12290 ld hl, (#Positie) 
12300 ld b, #32 

12310 :Invert0 

12320 call #VPeek 
12330 xor #259 

12340 call #VPoke 
12350 ine hl 

12360 djna HInvert0 
12370 ret 

12330 == 

12390 :Pixel 

12400 call #GetPos 
12410 call #GetLin 
12420 call #GetCol 
12430 ld hl, (#Positie) 
12440 call #VPeek 
12450 xor b 

12460 jp HVPoke 

1240 == 

12480 :JmpTab ‚wo HPlus 
124980 ‚wo #Min 
12000 ‚wo #Up 
12510 ‚wo #Down 
12520 ‚wo HLeft 
12530 ‚wo #Right 
12540 „wo #Home 
12550 ‚wo #HInvert 
12560 ‚wo #HPixel 
Tear 

12580 :KeyTab „by 43 
12590 ‚by 45 
12600 .by Pie 
12610 ‚by Sif 
12620 ‚by Flid 
12630 ‚by $le 
12640 by $Qb 
12650 „by 120 
12660 ‚by 32 
12670 ‚by OQ 
12680 —- 

12690 :SelfMod 

12700 jp HSelfMod 
12710. == 
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12720 
12730 
12740 
12750 
12760 
12770 
12780 
12780 
12300 
12810 
12820 
12830 
12840 
12850 
12860 
12870 
12880 
12890 
12900 
12910 
12920 
12830 
12940 
12950 
12960 
12970 
12980 
123990 
13000 
13010 
13020 
13030 
13040 
13050 
13060 
13070 
13080 
13090 
13100 
13110 
13120 
13130 
13140 
13150 
15160 
13170 
13180 
13130 
13200 
13210 


‘Sprites 


ie 


Id be 


‚#50040 


ld de, #$1b00 


Ìd hl 
call 
ld a, 
or HZ 
ld b, 
ld ©, 
call 

ret 


nat 


iÌd a, 


‚HStuff 
HRVMove 
(HRgISav) 


ä 


#1 
EWrtVDP 


#32 


ld (#Líin32),a 


call 
ld a, 
ld (# 


Enabse 
#1 
CrsX),a 


Id (#CrsY),a 


call 


Int v0 


call 
call 


SAL 


1jgad == 
13230 ENDCODE 
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call 
ld a, 


RSprites 


Foetup 
#KilBuf 


HIiseNte 
HO 


1d (FEscCnt),a 


call 


#ChGet 


ld (#Help),a 


le hk 


‚EKeyTab 


1d de, t#JmpTab 
sInite 


ld a, 
cp #O 
jPif 
ld a, 


(hl) 


zina vt 
(#Help) 


ep (hl) 


IF z 


FI 


THEN 
ld a, (de) 
id (#SelfMod+1),a 
inc de 
ld a, (de) 
Id (#S5elfMod+te),a 
call #SelfMaod 
je #Init0 


inc hìÌ 
inc de 


Ante d 


e 


jp #Ilnitd 


GOE 

COO4 
.: COO3 
: COOC 


re GOL 
.: CO14 
ee GOE 
„5 GOLG 
.: COZ20 
-e COZ4 

: CO238 


CO26 


+ CO30 


CO34 
 CO34 
OG 

: CO40 


1 CO44 


CO48 


1 CO4C 


en C050 
: COB4 
4 6058 
…C05G 
.: CO60 
.: CO64 
: CO68 


s COSC 


ve CO70 
6074 
„a COS 
s GOFE 
‚… CO80 
: COB4 
: CO88 
CO8C 
„: CO90 
: CO94 
.: CO98 
: CO9IC 


: COAO 
: COA4 


COA8 


1 COAC 


COBO 


1 COB4 


.: COB8 
… COBG 
.: COCO 
ze GOCA 
: COC8 


00 
OA 
OÂ 
OA 
OA 
1E 
1E 
1E 
1E 
32 
32 
32 
32 
46 
46 
46 


F3 
FB 
4D 
F3 
FB 
5C 
3E 
O1 
21 
2 
Zal 
21 
21 
00 
02 
DG 
C8 
CO 
02 
82 
F3 
2Â 
10 
02 
TE 
CO 
3D 
80 
CB 
Bi 
1E 
O2 
CO 
CO 


00 
BC 
AO 
B4 
C8 
BG 
AO 
B4 
C8 
8C 
AO 
Bá 
C8 
BC 
AQ 
B4 
C3 
CD 
C9 
00 
CD 
C9 
00 
O0 
CO 
CB 
CB 
CB 
CB 
CB 
38 
CO 
F3 
ED 
13 
CO 
CO 
FE 
O2 
ee 
CQ 
CO 
SÂ 
E6 
FE 
38 
CO 
08 
CO 
23 
Ei 


00 
00 
00 
00 
00 
00 
00 
0Ô 
OO 
00 
0Û 
00 
00 
00 
00 
00 
00 
AA 
F3 
FB 
56 
F3 
FB 
AT 
4F 
10 
10 
10 
10 
10 
09 
G9 
FE 
SB 
ED 
3D 
JÀ 
09 
CO 
18 
C9 
C3 
DD 
O7 
OO 
3D 
16 
E5 
CD 
22 
O6 


00 
00 
O1 
02 
03 
04 
05 
06 
07 
08 
09 
OA 
OB 
OG 
OD 
OE 
OF 
OO 
CD 
C9 
00 
CD 
C9 
3À 
CB 
CB 
CB 
CB 
CB 
21 
22 
3A 
01 
02 
53 
C3 
DD 
D8 
La 
ez 
CD 
92 
F3 
06 
C8 
C3 
08 
2Â 
44 
O2 
80 


idni 


A RN 


Ee 
Et . . 


GOGG 
CODÔ 
COD4 
COD8 


ns GODC 


COEO 
COE4 


COES 


COEC 


;_COFO 


COP 4 


; COF& 


COFC 


C100 


C104 


C108 


C10C 


C110 


Cli4 


C118 


C11C 


C120 


C124 
C128 
C12C 


1 C130 


C134 


C138 


C13C 


C140 


C144 


C148 


C14C 


C150 


C154 


“s C158 


C15G 


C160 


C164 
C168 
C16C 


C170 


C174 


C178 


C17G 


“+ C180 


C184 


“: C188 


C18C 


ee C190 


C194 


32 

C2 

C4 

3E 
CÔ 

3A 
C2 
18 
Cz 
CD 
00 
CO 
CD 
08 
CO 
C3 
O1 
E6 
27 
10 
CD 
23 
F7 
CO 
C1 
FE 
1E 
3Â 
10 
C3 
DD 
C8 
A2 
F3 
JE 
00 

3E 
O0 

C3 
5C 

CO 

44 

CD 
10 

5C 
CO 

2ÂA 
44 

4A 
26 

33 


00 
Dö 
C3 
DB 
23 
00 
CO 
00 
BG 
50 
18 
ZL 
BA 
18 
21 
BA 
CO 
JF 
CB 
dn 
4 A 
23 
C9 
35 
3Â 
O1 
C3 
DG 


A2 
F3 
JE 
00 
FE 
1C 
CD 
00 
2Â 
50 
CO 
06 
CO 
4 A 
F5 
CO 
CD 
02 
GO 
CO 
Cl 
C1 


CO 
CO 
DA 
CD 
CB 
CO 
CO 
Og 
CO 
CO 
CD 
00 
CO 
CD 
08 
CO 
34 
ft 
27 
O2 
CO 
23 
21 
C3 
DO 
C8 
A2 
F3 
SE 
00 
FE 
ID 
SÂ 
10 
C3 
5C 
Oi 
Oz 
CO 
2Â 
20 
EE 
CO 
C9 
CD 
Ä9 
CO 
A8 
OB 
2D 
43 


AO 
3E 
CÔ 
4A 
38 
1D 
Gr 
15 
C9 
21 
BA 
13 
21 
BA 
19 
21 
7E 
CB 
06 
iB 
23 
10 
Oi 
OF 
F3 
SE 
00 
FE 
IN) 
3À 
O1 
C3 
DD 
C8 
AZ 
CO 
20 
CO 
CD 
O2 
CD 
FE 
23 
CD 
A3 
CO 
CD 
C3 
C1 
C1 
C1 


der 


GPRS 


CO [ - . 1 


We 
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C198 
C19G 


 _C1A0 


C1A4 


.: C1A8 
.: C1AC 


C1B0 


vd C1B4 


C1B8 


ee GIBG 
CEGO 


C1C4 


zi GICS 
st GLEGO 
: C1DO 
C1D4 
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CO44 
CO45 
CO48 
CO49 
CO4Á 
CO4B 
CO4E 
CO4F 
CO5O0 
COSÌ 
CO54 
C055 
CO56 
CO57 
COSA 
COSB 
CO5C 
COSE 
COSF 
CO62 
CO63 
CO65 
CO67 
CO69 
CO6B 
CO6D 
CO6F 
CO71 
CO73 
CO75 
CO77 
COTTA 
CO7B 


4E 
67 
2B 
1D 
20 
C1 
de 
O4 
CO 
F6 
01 
3E 
F3 
3E 
F3 
CD 


F3 
CD 
FB 
Cg 
F3 
CD 
FB 
CJ 
F3 
CD 
FB 
C3 
F3 
CD 
FB 


C3 


3E 
477 
SA 
4E 
CB 
CB 
CB 
CB 
CB 
CB 
CB 


CB 
CB 
21 
Og 
22 


C1 
C1 
eD 
1C 
00 
O1 
00 
CO 
JA 
Oz 
C3 
20 
CD 
O1 
2 
AD 


AA 


AD 


56 


5C 


00 
O1 


21 
10 
21 
10 
21 
10 
21 


el 
10 
00 


Oe 


59 
TB 
IE 
OB 
C3 
40 
iB 
CD 
EO 
47 
47 
32 
SF 
32 
DCG 
Cl 


00 


00 


00 


00 


CO 


33 
CO 


Cl 
CI 
IF 
78 


00 
21 
56 
F3 
OE 
00 
AF 
00 
DD 
F3 
CD 


DI 
CALL $004A 
EI 
RET 


DI 

CALL $OO4D 
EI 

RET 

DT 

CALL $0056 
EI 

RET 

DI 

CALL $0056G 
EI 

RET 

LD A,800 
LD B,A 


LD A, ($COOI) 


LD C,A 
SLA GC 
RL B 
SLA C 
RL B 
SLA C 
RL B 
SLA C 
RL B 
SLA C 
RL B 


LD HL,$3800 


ADD HL,BG 


LD ($CO02),HL 


C1D8 
C1DC 
C1EO 


C1E4 


CIE8 


CIEG' 


C1FO 


CiF4 


C1F8 


CIFC 


C200 


C204 


C208 


_: C20C 


C210 


FO 
O1 
JE 
FG 
dè 
AO 


CA 
00 
OD 
ÂB 
SZ 


C1 
C3 


CO 
CD 
00 
CD 
00 
C1 


DD 
CO 
C2 
C1 
AG 
C1 
23 
F1 


CD 
BA 
SZ 
9E 
CO 
ta 
FE 
C1 
BE 
A 
13 
C1 
C3 
13 
Ci 


56 
00 
ÂT7 
00 
21 
8E 
00 
3Â 
C2 
32 
1ÀA 
GD 
D7 
13 
DO 
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COTE 
CO7F 
CO82 
CO84 
CO85 
CO89 
COBA 
CO8E 
CO8F 
CO92 
CO95 
CO97 
CO98 
CO9B 
CO9E 
CO9F 
COA2Z 
COA3 
COAG6 
COA9 
COAG 
COAD 
COAF 
COB] 
COB3 
COB4 
COB6 
COB7 
COBA 
COBC 
COBE 
COBF 
COC2 
COC5 
COC6 
COC 
COCA 
COCC 
COCF 
CODO 
COD3 
COD5 
COD8 
CODA 
CODD 
CODE 
COEO 
COES 
COE4 
COET 
COEA 
COEB 


DC 
O1 


5B 
53 


82 
DD 
09 


Oz 
10 


02 


tE 
92 
DD 


07 
80 
00 


38 


Bi 
08 
08 


02 
Âd 


O2 


80 
00 


Dö 
C4 
DA 
DB 
4A 


38 
00 


CG 
18 


F3 


Oë 
02 
CO 
F3 
CO 
00 
CO 
CÔ 


CO 
F3 


CO 


CO 
CO 


CO 


CO 
CO 
CO 
CO 


CO 


CO 
O0 


CO 
CO 


RET 

LD A,‚($F3DG) 
CP 801 

RET Z 

LD DE, ($CO02) 
INC DE 

LD ($COO2),DE 
DEC A 

JP $COB2 

LD A‚($FSDD) 
CP $09 

RET GC 

LD HL, ($COO02) 
LD DE, $0010 
ADD HL,DE 

LD ($COO2), HL 
RET 

CALL $CO7E 
JP $CO92 

LD A, ($F3DD) 
DEC A 

AND $07 

LD B,$80 

CP $00 

RET Z 

SRL B 

DEC Á 

JP $COB1 

LD D,$08 

LD E‚$08 
PUSH HL 

LD HL, ($CO02) 
CALL $CO44 
ING HL 

LD ($6002),HL 
POE. HL 

LD B,‚$80 

LD ($COOO),A 
AND B 

JP NZ,$COD8 
LD A,$C4 

JP $CODA 

LD A,$DB 
CALL $CO4À 
INC HL 

SRL B 

LD A, ($CO00) 
DEC E 

JP N4,BCOGG 
LD BC,$0018 
ADD HL,BC 
DEC D 
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COEC 
COEF 
COFO 
COF3 
COF6 
COF9 
COFG 
COFF 
C102 
C105 
C108 
C10B 
CLOE 
CIOF 
C110 
C112 
ot 
C115 
GEE 
C119 
C11G 
CIIF 
C120 
C121 
C122 
C123 
C125 
C126 
C129 
C1ZÂ 
C12D 
C130 
C132 
C133 
C135 
C138 
C13B 
Gi3D 
CI3E 
C140 
C143 
C146 
C148 
C149 
CI4B 
C14E 
C1SÌ 
C153 
C154 
C156 
C159 
C15G 


C2 
C9 
CD 
21 
CD 
21 
CD 
21 
CD 
gl 
C3 
21 
34 
TE 
E6 
Lt 
CB 
CB 
06 
2 
CD 
23 
23 
23 
23 
10 
C9 
21 
39 
C3 
JÂ 
FE 
C8 
3E 
C3 
3Â 
FE 
C8 
JE 
C3 
3Â 
FE 
C8 
3E 
C3 
3Â 
FE 
C8 
3E 
C3 
CD 
JE 


BC 


9C 
00 
BA 
O0 
BA 
08 
BA 
08 
BA 
O1 


SF 


ld 
dif 
10 
Oz 
4A 


F7 
O1 


OF 
DG 
O1 


1E 
ÄZ 
DC 
10 


LE 
A2 
DD 
Oi 


iD 
A2 
DD 
10 


iG 
Âz 
BC 
00 


CO 


CO 
18 
CO 
19 
CO 
18 
CO 
19 
CO 
CO 


LB 
CO 


CO 


C1 
F3 


00 
F3 


0Û 
F3 


00 
F3 


00 
CO 


JP NZ, $COBC 
RET 

CALL $CO5C 
LD HL,$1800 
CALL $COBA 
LD HL,$1900 
CALL $COBA 
LD HL,$1808 
CALL $COBA 
LD HL,$1908 
JP $COBA 

LD HL,$COÓO1 
INC (HL) 

LD A,‚ (HL) 
AND $3F 

LD (HL}),A 
SLA A 

SLA A 

LD B, $10 

LD HL,&1B02 
CALL $CO4A 
INC HL 

INC HL 

INC HL 

ING HL 

DJNZ @C11C 
RET 

LD HL, $COO1 
DEC (HL) 

JP $C1OF 
LD A, ($F3DC) 
CP $01 

RET 4 

LD A,$1E 

JP $OOAZ 

LD A, ($F3DC) 
CP $10 

RET Z 

LD A,$1F 

JP $00AZ 

LD A, ($F3DD) 
CE SAL 

RET 2 

LD A‚,$iD 

JP $00A2 

LD A, ($F3DD) 
CP $10 

RET Z 

LD A,$1C 

JP $0O0OA2 
CALL $CO5GC 
LD A,$00 
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CISE 
C161 
C164 
C167 
C16A 
C16D 
C16F 
C172 
C174 
C177 
C178 
C17A 
C17B 
C17E 
C181 
C184 
C187 
C18A 
C18B 
C1ISE 
C18F 
C130 
C192 
C193 
C194 
C195 
C197 
C198 
C199 
C19Â 
C1S9B 
C19C 
C19D 
C19E 
CIF 
C1A0 
CIA 
C1AZ 
C1A4 
C1A5 
C1A6 
C1A7 
CiAS 
CIAA 
C1AD 
C1BO 
C1B3 
C1B6 
C1B9 
C1BC 
C1BE 


O1 
zÄ 
C3 
CD 
éÄ 
06 
CD 
EE 
CD 
23 
10 
Cg 
CD 
CD 
CD 
2Â 
CD 
Â8 
G3 
OB 
Cl 
26 
2D 
C1 
38 
43 
cal 
4E 
C1 
59 
C1 
B 
C1 
7B 
Cl 
2B 
2D 
1E 
iD 
iG 
OB 
78 
20 
C3 
Ol 
tl 
21 
CD 
JÂ 
F6 
AT 


20 
02 
50 
5C 
0 
20 
4d 
FF 
4A 


F5 


5G 
Â3 
A9 
02 
Â 4 


4 A 


Ci 


C1 


1F 


00 


40 
00 
04 
56 
EO 
02 


00 
CO 
GO 
CO 
CO 


CO 


GO 


CQ 
CO 
CO 
CO 
CO 


CO 


Ci 
O0 
EB 
CO 
CO 
F3 


LD BC, 50020 
LD HL, ($COOZ) 
JP $CO50 
CALL $COS5C 
LD BL, ($CO02) 
LD B,$20 
CALL $CO44 
XOR SFF 
CALL $CO4A 
ING HL 

DJNZ @C16F 
RET 

CALL $COSC 
CALL $COA3 
CALL $COA9 
LD HL, ($COO02) 
CALL $CO44 
XOR B 

JP $CO4A 
DEC BO 

POR BG 

LD H,‚$C1 
DEG L 

POP BC 

JR C,@C157 
LD B,‚E 

POP BC 

LD G, (HL) 
POP BG 

LD E‚C 

POP BC 

ED HA 

POP BC 

LD A,E 

POP BG 

DEC HL 

DEC L 

LD E‚$1F 
DEG E 

INC E 

DEC BC 

LD A,B 

JR NZ,@C1AA 
JP $C1IAA 

LD BG, $0040 
LD DE, $1B00 
LD HL, $CO04 
CALL $CO56 
LD A, ($F3E0) 
OR $02 

LD B,A 
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CIBF 
C1C1 
C1C4 
C1C6 
CIC9 
C1CG 
CICE 
C1D1 
C1D4 
C1D7 
C1DA 
C1DD 
C1EO 
CIE2 
C1ES5 
C1E8 
C1EB 
CIEE 
C1F1 
C1F2 
C1F4 
C1iF7 
CIFA 
C1IFB 
CIFE 
CIFF 
C202 
C203 
C204 
C207 
C20A 
C20D 
C20E 
C20F 
C210 
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OE 
C3 
3E 
32 
CD 
3E 
32 
32 
CD 
CD 
GD 
CD 
3E 
32 
CD 
32 
21 
LL 
TE 
FE 
CA 
3Â 
BE 
C2 
1À 
32 
13 
1ÀA 
32 
CD 
C3 
23 
13 
13 
C3 


O1 
47 
20 
AF 
6E 
O1 
DD 
DC 


FO 
56 
BA 
O9 
SF 
00 
AO 
8E 
00 
DD 
00 
OD 


AB 


AC 
D7 


F1 


OÔ 


F3 
00 


F3 
F3 
C1 
CO 
01 
OO 


FC 
00 
CO 
C1 
Cl 


C1 
GO 
C2 
C1 
Cl 


Cl 
Cl 


C1 


LD C,‚,$01 

JP $0047 

LD A,$20 

LD ($F3AF),A 
CALL $OO5E 
LD A,$01 

LD ($F3DD), A 
LD (SF3DC),A 
CALL $C1AD 
CALL $COFO 
CALL $0156 
CALL $00BA 
LD A, $00 

LD ($FCAT),A 
CALL SOO9F 
LD ($CO00),A 
LD HL, $C1AO0 
LD DE, $C18E 
LD A, (HL) 

CP $00 

JP 4,$C1DD 
LD A, £$COO0) 
CP (HL) 

JP NZ, 5C20D 
LD A, (DE) 

LD ($CIAB),A 
ING DE 

LD A, (DE) 

LD ($C1AC),A 
CALL SC1AA 
JP $C1D7 

INC HL 

INC DE 

ING DE 

JP SCIF1 


Voordat u iets met sprites kunt doen, moet u wel aan de sprite-vormen kunnen 
komen. Vandaar als voorbeeld een sprite-editor. Ten eerste ziet u hoe u de sprites 
op beeld krijgt, maar bovenal hoe u 16 x 16-sprites (Niemand die 8 x 8-sprites 
maakt. Of wel soms?) kunt gebruiken. 

Vanzelfsprekend kunt u deze zelf ontworpen sprites ook opslaan. Dit gaat vanuit 
BASIC door middel van een video-SAVE-opdracht. Zo'n weggeschreven sprites- 
set kunt u naderhand met een video-LOAD-commando weer binnenhalen. 


De sprite-editor lijkt nogal wat op de karakter-editor. Het zal dus inmiddels voor 
u geen enkel probleem opleveren om uit te zoeken hoe het programma werkt. 
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21.2 De routines op een rij 


STUFF is een tabel voor alle sprite-benodigdheden. Erg handig omdat u met een 
RAM /video-kopieerinstructie meteen alle sprites initialiseert. 


VPEEK, u weet wel. 

VPOKE, dito. 

VFILL, u welbekend. 

RVMOVE, dezelfde instructie als bij het hires-voorbeeld. 


GETPOS berekent de plaats van de huidige sprite-informatie. Dit komt neer op 
een ‘sprite maal 32’-berekening. 


HIGHT calculeert een te adresseren patroonpositie in, rekening houdend met de 
Y-waarde van de cursor. 


WIDTH kijkt naar de X-waarde van de cursor om, indien u in het derde of vierde 
sprite-blokje edit, 16 extra bij te tellen. 


GETLIN kijkt welk byte uit het patroon van 16 x 2 bytes thans wordt bewerkt. 


GETCOL kijkt welk bit uit het byte thans wordt bewerkt. We kijken ‘slim’ naar de 
X-waarde van de cursor. 


PART zet een 8 x 8 bit-matrix op het scherm. Te vergelijken met SETUP uit de 
karakter-editor. 


SETUP zet een 16 x 16-matrix op het scherm, gebruik makend van het feit dat 
een 16 x 16 sprite uit vier 8 x 8-blokken bestaat. 


PLUS verhoogt de nu bekeken sprite met één. Na afloop wordt voor de 16 
voorbeeld-sprites de nieuwe sprite-pointer aangemaakt. 


MIN verlaagt de nu bekeken sprite met één. 


UP verplaatst indien mogelijk wordt de cursor één locatie naar boven. 


173 


DOWN verplaatst indien mogelijk de cursor één locatie naar beneden. 
LEFT verplaatst indien mogelijk de cursor één locatie naar links. 
RIGHT verplaatst indien mogelijk de cursor één naar rechts. 

HOME wist de inhoud van de sprite (alles op 0). 


INVERT inverteert het geadresseerde sprite-patroon. Alle 0-bits worden geset en 
andersom. 


PIXEL berekent de pixelpositie van de cursor en XOR-t deze waarde met de 
desbetreffende bitadressering. Pixel aan wordt pixel uit en andersom. 


JMPTAB bevat de adressen die worden aangeroepen als er op een juiste toets 
wordt gedrukt. 


KEYTAB bevat de waarden die horen bij een commandotoets op het toetsen- 
bord. Een KEYTAB-adressering is niet meer dan een pointer naar de vorige tabel. 


SELFMOD is een CALL-routine die door de key scan wordt veranderd als er op 
een juiste toets wordt gedrukt. 

Stel dat de PLUS-routine moet worden aangeroepen. Het low-byte van PLUS 
komt van KEYTAB en wordt op SELFMOD + 1 geplaatst. Het high-byte van 
PLUS komt van KEYTAB + l en wordt op SELFMOD + 2 geplaatst. 


SPRITES initialiseert de gebruikte sprites. Ook worden de sprites op 16 x 16- 
grootte ingesteld. 


INIT stelt de juiste schermbreedte en scherm-mode in, waarna (met CTRL/ 
STOP-check) de juiste commando's worden bepaald enz. 
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De software 


Als ontwikkelings-software bieden we u SPEEDTYPER en HERBYMON aan. 
Deze machinecodelisting-verwerker en machinecode-monitor kunt u aan de hand 
van de listings invoeren. 

De SPEEDTYPER heeft u nodig om de HERB YMON te kunnen invoeren. Dit is 
expres zo gedaan: HERBYMON in BASIC-DATA-regels zou ruim 40% groter 
worden dan een SPEEDTYPER plus HERBYMON. Tevens zorgt de SPEED- 
TYPER voor een invoercontrole. | 


De HERBYMON gebruikt u onder andere om de voorbeelden uit dit boek te 
kunnen proberen en eventueel ook om eigen machinecode te ontwikkelen. De 
HERBYMON beslaat het geheugengebied $A000-5CO000 en het startadres is 
49059 decimaal. U krijgt ook nog een startprogramma voor de HERBYMON., 
Als u een diskdrive heeft, zou u dit programma als AUTOEXEC.BAS op de schijf 
kunnen zetten. Dit heeft tot gevolg dat de monitor automatisch start. 


Van beide programma’s volgt de handleiding na de listing. 
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22 


22.1 De listing 

1000 REM kk RR KR IOR KHK 

1010 REM Xxx SPEEDTYPER XXX 

1020 REM kkk RR KOK KOK OK KK 

10307 

1040 SCREEN1:WIDTH30 

1050 CLEARZ20O0,&H9FFF 

10660 CR$=CHR$(13)}) 

1070 LFS=CR$+CHRE(1O) 

1080 BG$=CR$+CHR$ (27) +CHRS(&HAD) 
1090 : 

1100 GES 

1110 PRINT "kkk kkk kook ok ok ok okokok ok 

1120 PRINT"*** SPEEDTYPER XX*" 

1130 PRINT" kor kkk RR ORK OR OK ok ok ** 

1140 PRINT 

1150 INPUT"BEGIN-ADRES'" ; BÁ 

1160 IFHEX$(BA)<HEXS(&HAOO0O0) THEN1150 
1170 INPUT" EIND-ADRES" ;EA 

1180 IFHEX$(EA)<HEXS$ (BA) THEN1170 
1190 : 

1200 PRINT 

1210 PRINT"BEGIN-ADRES — &h";HEXS$(BA) 
1220 PRINT" EIND-ADRES — &h";HEXS$S(EA) 
1230 PRINT 

1240 INPUT"IS DIT OK? (j/n)";JN$ 
1250 IFJN$<>" 3" THENRUN 

1260 : 

1270 REM XXX 

1280 : 

1290 CLS 

1300 PRINT" *x*x SPEEDTYPER OPTIES *%*” 
1310 PRINT 

1320 PRINT" (1) — ’LEEG POKEN’ " 
1330 PRINT" (2) — DATA BEKIJKEN" 
1340 PRINT” (3) — DATA INVOEREN" 
1350 PRINT” (4) — DATA LOADEN" 
1360 PRINT” (5) — DATA SAVEN" 

1370 PRINT" (6) — STOPPEN 

1380 PRINT 
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De SPEEDTYPER 


1390 
1400 
1410 
1420 
1430 
1440 
1450 
14650 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
dr TO 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 


PRINT" <MAAK UW KEUZE>" 

IP$=INKEYS 

IFIP$<"1"ORIPS$> "6" THEN1400 

CLS 
ONVAL("+"+IP$)GOTO1540,1840,2270,1640,1740, 1470 


REM sx 


PRINT" **XSTOPPEN XXX" 

INPUT ZEKER WETEN? (5/n)';JNS 
IFJNS=" j" THENRUN 

GOTO1290 


REM *X*x 


PRINT "**x’ LEEG POKEN’ xxx” 
INPUT" ZEKER WETEN? (3/n)";JNS 
IEFJNS<>"j"THEN1290 
FORT=BATOEA 

: _POKE(T),0 

NEXT 

GOTO1290 


REM *XX 

PRINT" **X*DATA LOADEN***" 
INPUT" ZEKER WETEN? (j/n);JN$ 
IFJNS<>"j"THENIZ90 

PRINT 

INPUT"FILENAAM: ";N$ 

BLOADN%S 

GOTO1230 


REM X*x 


PRINT" *XKDATA SAVEN*XX" 
INPUT" ZEKER WETEN? (3/n)';JN$ 
IFJN$<>"j"THEN1290 

PRINT 

INPUT"FILENAAM: "‚;N$ 
BSAVENS, BA, EA 

GOTO1290 


REM KK 


PRINT "**XDATA BEKIJKEN%*%" 
INPUT" ZEKER WETEN? (j/n)";JN$ 
IEFJNS$<>" j"THEN1290 

PRINT 

INPUT" (pP)RINTER / (s)CHERM' ; DVS 
INPUT"ZEKER WETEN? (j/n);JNS$ 
IEFJN$<>" j"THEN1890 


L77 


1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
20 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
23930 
2400 
2410 
2420 
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PRINT 

PRINT" SPATIEBALK=PAUZE" 
PRINT” CURSOR=OPTIES!" 
PRINT 

PRINT" <SPATIEBALK>" 
IFSTRIG(O)=0THEN1960 
CLS 

NA=BA 

DO$="SPEEDDUMP VAN "+HEX$(BA)+" TOT "+HEXS(EA)+LFS 
GOSUB 2140 

DO$=HEXS (NA) +": 
GOSUB2180:Di=CK 


DO$=DOE+" 


GOSUB2180:D2=CK 

DOB=DOEF" * 
CKS=HEXS(D1+D2): IFLEN(CKS) =1 THENCK$="00"+CKS$ 
IFLEN(CKS)=2THENCKS$="0"+CK$ 

DOB=DOE+CKE+CRS 

GOSUB2140 

AB=STICGK(O): IFAB<>OTHEN1290 

IFNA<EATHEN2010 

GOTO1230 


PRINTDOS 

IFDV$="p" THENLPRINTDOS 

IF STRIG(O)THEN2160 

RETURN 

CÁ=0: FORNA=NATONA+3 
AD$S=HEX$ (PEEK (NA) ) 
IFLEN(AD$)=1THENADS$="0"+ADS$ 
DOB=DOE+ADE 

: _CK=CK+PEEK(NA) 

NEXT : RETURN 


REM XXX 


PRINT" **XDATA INVOERENXXX" 

INPUT" ZEKER WETEN? (j/n)";JN$ 
IEFJNS<>" j"THEN1290 

PRINT 

INPUT" INVOER-ADRES" ; TA 
IF(TA<SBA)OR(TA>EA) THEN2310 

PRINT 

PRINT” BEGIN-ADRES — &h";HEXS$(BA) 
PRINT" INVOER-ADRES — &h";HEXS(TA) 
PRINT” EIND-ADRES - &h";HEXS(EA) 
PRINT 

ENPUT" IS DIT OK? (3/0) sJNS 
IFJN$="n "THEN2300 

PRINT" ’X’=OPTIES" 

PRINT 

PRINT" <SPATIEBALK?> " 


2430 
2440 
2450 
2450 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2610 
2620 
2630 
2640 
2650 
2660 
2670 
2680 
2690 
2700 
2710 


2720 : 


2730 


2740 : 


2750 
2760 
2770 
2780 
2730 


2800 : 


2810 
2820 
2830 


IFSTRIG(O)=0OTHEN2430 
IFSTRIG(O)THEN2Z440 

CLS: IS=INKEYS$ 

NA=TA 

DOS=-HEXS(NA)+": 
PRINTBGS; DOS; CHR$(95) ; 
I$=INKEY$: IFIS=""THEN2490 
AS=ASC(IS) 

IFAS=120THEN1 290 
IF(AS=127)OR(AS=8) THEN25 30 
IF(AS<48)OR(AS>102)THEN2490 
IF(AS>57)AND(AS<96) THEN2490 
IFLEN(DOS)=13THENIS=IS+" 
IFLEN(DO$)=22THENI$=IS+" 
DOS=DO$+I$: IFLEN (DOS) =27THEN2640 
GOTO2480 

IFLEN(DOS) <7 THEN2490 
DOS=LEFT$ (DOS, LEN(DOS) -1) 
IFLEN(DOS)=1A4THENDOS=LEFTS (DOS, 13) 
IFLEN(DOS)=23THENDOS=LEFTS (DOS, 22) 
GOTO2Z480 

PRINTBGS ; DO% 
P1$=MID$(DO8, 7,8) 
P2$=MID$(DOS, 16,8) 
CKS=MID$(DO$, 25,3) 
PT$=P1$+P2S+" 7 

CK=0 

FORT=OTO7 
PB$="&h"+LEFTS(PTS, 2) 
PTS=RIGHT$S(PTS, LEN(PTS) -2) 
PW(T)=VAL(PBS) 

CK=CK+PW(T) 

NEXT 
IFCK=(VAL("&h"+CKS$) ) THEN2780 
PRINT" CHECKSUM ERROR!" : GOTO2470 
FORT=OTO?7 

POKENA, PW(T) 

NA=NA+1 

NEXT 

IFHEX$ (NA) <HEXS(EA) THEN2Z470 
GOTO1290 


22.2 Werken met de SPEEDTYPER 


Het moet natuurlijk geen enkel probleem hebben opgeleverd om de SPEEDTY- 
PER ín te typen. Laten we gemakshalve meteen maar aannemen dat u dit foutloos 
heeft gedaan. 
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U start de SPEEDTYPER vanuit BASIC met het RUN-commando. Eerst wordt 
om een beginadres gevraagd. Dit ís in ons geval het beginadres van de HERBY- 
MON, te weten &HA000. 

Vervolgens een eindadres. Bij het intypen van de HERBYMON moet dit 
&HCOO00 zijn. (&HAO00 - &HCO000 dus) 


Na het J-antwoord komt u in het hoofdmenu terecht. U kunt hier kiezen uit zes 
opties: 


ID) ‘LEEG POKEN” 
2) DATA BEKIJKEN 
3) DATA INVOEREN 
4) DATA LOADEN 
5) DATA SAVEN 

6) STOPPEN 


Door op de corresponderende cijfertoets te drukken, selecteert u de optie. Vervol- 
gens wordt u door middel van vraag en antwoord op uw wenken bediend. 


LEEG POKEN’ 


Dit ‘leeg poken’ doet u eigenlijk maar één keer: Aan het begin van uw marathon- 
intypsessie. 

Het gevolg is dat het toegewezen geheugengebied op 0 wordt gezet. Dit heeft als 
voordeel dat u later gemakkelijk kunt opzoeken waar u de vorige keer was 
gebleven. 


DATA BEKIJKEN 


U kunt nu het toegewezen geheugengebied gaan nakijken. Vanaf het beginadres 
tot aan het eindadres kunt u het geheugen bekijken in het speciale SPEEDTY- 
PER-formaat, dus met checksum.U kunt de data niet alleen op het scherm 
bekijken; u kunt de data ook naar de printer sturen. Komt misschien nog wel eens 
van pas bij een moeilijk te vinden intypfout.… 

Met de spatiebalk pauzeert u en het indrukken van een cursortoets brengt u weer 
in het hoofdmenu. 
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DATA INVOEREN 


In feite de belangrijkste optie. U kunt nu aan de hand van een SPEEDTYPER- 
listing een programma (De HERBYMON dus) invoeren, terwijl de invoer auto- 
matisch wordt gecontroleerd. Fouten maken wordt haast onmogelijk, op voor- 
waarde dat u wel de juiste adressen in de gaten houdt! 


Er wordt om een invoeradres gevraagd. Dit is het beginadres van het toegewezen 
geheugengebied als dit uw allereerste poging wordt. In een ander geval dient het 
laatst getypte adres als invoeradres, dus het adres waar u de vorige keer bent 
opgehouden. 


Nog even een kleine controle en daar gaat u (met de X-toets komt u weer in het 
hoofdmenu terecht). 

U neemt in dit geval de HERBYMON-listing en u zoekt naar het adres uit deze 
listing dat overeenkomt met het adres dat u links in beeld ziet. Gevonden? Dan 
typt u de regel netjes na. ('BS' als u een foutje maakt!) 

Als u de regel foutloos heeft overgenomen, wo rdt deze geaccepteerd en krijgt u het 
volgende adres om in te vullen. Als ueen fout maakt moet u na een ‘CHECKSUM 
ERROR! de regel nog eens proberen. 


Dit gaat net zolang door tot de hele listing is ingevoerd, of totdat u er genoeg van 
heeft. In het laatste geval drukt u op de “X’-toets. Vergeet u nu vooral niet om de 
ingevoerde data ‘weg te SAVEn’ met de gelijknamige optie! 


DATA LOADEN 


U kunt nu het gedeelte binnenhalen waaraan u de vorige sessie hebt gewerkt. 
Misschien om het af te maken, of om een eventuele adresfout te verwijderen. Denk 
om de juiste bestandsnaam! 


DATA SAVEN 


Vlak voordat u stopt met deze intyp-sessie, of gewoon voor de zekerheid, kunt u 
de thans ingevoerde data opslaan op cassette en/of diskette. U geeft een gewenste 
file-naam, opslaan en klaar! 


STOPPEN 


Einde van het programma. 
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23 De HERBYMON 


23.1 De programmalisting 


SPEEDDUMP VAN A000 TOT COO0O 


A000: 
A008: 
AO10: 
A018: 
AO20: 
A023: 
AO30: 
A038: 
AO40: 
AO43: 
AO050: 
A058: 
AO60: 
AO068: 
AO7O: 
A078: 
A080: 
A088: 
AO90: 
AO98:; 
AOAO: 
AOA8: 
AOBO: 
AOB8: 
AOCO: 
AOC8: 
AODOÒ: 
ACD38: 
AOEO: 
AOES: 
AOFO: 
AOFB: 
A100: 
A108: 
A110: 
A118: 
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AEAF50O3E 
432CC23E 
42432920 
43204243 
2042344 
JE4C4420 
52404341 
41462C41 
44442048 
JE4C4420 
43293E44 
433E494E 
44454320 
20432001 
A1 3E444A 
SE4C4420 
3E4C4420 
2C4A13E49 
453E494E 
44454320 
20442CC1 
SE4A5220 
44204840 
4C442041 
29314445 
SE4I4E43 
45432045 
452CC13E 
AA52204E 
4C442048 
4C442028 
20292C48 
4320484C 
20483E44 
3E4C4420 
444141 3E 


4C442042 
4C442028 
41 3E494E 
JE494E43 
45432042 
422CC13E 
3E455820 
46273E41 
40204243 
412C2842 
45432042 
4320433E 
433E4044 
3E525243 
4ESAZ0C3 
44452002 
28444529 
4E432044 
4320443E 
443E4CA4 
SE524C41 
C33E4144 
2C44453E 
20284445 
43204445 
20453E44 
3E4C4420 
5252413E 
SA2CC33E 
4AC2CC23E 
C2202020 
4C3E494E 
JE494E43 
45432048 
A82CC1I3E 
AAS52205A 


alD 
247 
1FO 
200 
ICE 
25B 
dt 
1E0 
LED 
1C5 
1D8 
1FG 
iFD 
275 
298 
265 
1C8 
1E9 
LEE 
IFE 
26E 
280 
iEB 
ICE 
1DC 
IFF 
1DB 
293 
231 
270 
1FA 
IDE 
20E 
1DA 
261 
21A 


A120: 
A128: 
A130: 
A138: 
A140: 
A148: 
A150: 
A153: 
A160: 
A163: 
Â170: 
A178: 
A180: 
A188: 
A190: 
Â198: 
A1AO: 
Â1AB: 
ALBO: 
A1B8: 
A1CO0: 
A1C8: 
A1DO: 
A1D8: 
A1EO: 
A1ES8: 
AÌFO: 
Â1F8: 
200: 
Â208: 
A210: 
A218: 
A220: 
A228: 
A230: 
A233: 


2CCIJE41 
4C2C484G 
484C2C28 
20293E44 
ACSE494E 
44454320 
20402001 
SE4AS 220 
3E4C4420 
3E4C4420 
20202920 
43205350 
20284840 
43202848 
44202848 
3E534346 
432CC33E 
484C2C53 
20412028 
20293E44 
SOSEA94E 
44454320 
20412001 
3E4C4420 
4C442042 
44204220 
20422C45 
422C433E 
aCAC3E4C 
28484C29 
422C413E 
2C423E4C 
433E4C44 
3E4C4420 
4C442043 
44204320 


44442048 
3E4C4420 
C2202020 
45432048 
43204C3E 
4C3E4C4AA 
3E43504G 
AE432CC3 
53502002 
28C22020 
413E494E 
3E494E43 
293E4445 
ACZI3E4C 
4C292CC1 
SE4A5220 
41444420 
SOJEA4CA4 
C2202020 
45432053 
432041 3E 
A13E4C44 
3E434346 
422C423E 
2C433E4C 
44A3E4C44 
3E4C4420 
4C4A42042 
44204226 
JE4C4420 
4C442043 
4420432C 
20432044 
432C453E 
2C483E4C 
4CIE4CA4 


25E 
1FA 
20A 
1BB 
20E 
206 
276 
2T7A 
21E 
218 
lAB 
21E 
1CC 
1D2 
236 
214 
259 
231 
1D7 
1C6 
207 
1FB 
258 
iDC 
IEB 
iE4 
LET 
1E6 
iD4 
1D3 
1EO 
1CB 
1E4 
1E0 
Lei 
IED 


A240: 
A243: 
A250: 
A258: 
A260: 
A268: 
A270: 
A278: 
A280: 
A288: 
A290: 
A2958: 
A2A0: 
A2AB: 
A2BO: 
A2B3: 
A2C0: 
A2C8: 
A2DO: 
A2D3: 
A2EO: 
A2E8: 
A2EO: 
A2F8: 
A300: 
Â308: 
A310: 
A318: 
A320: 
A328: 
A330: 
A338: 
A340: 
A348: 
350: 
A358: 
A360: 
A358: 
A370: 
A373: 
A380: 
A388: 
A390: 
Â398: 
A3AO0: 
A3A8: 
A3BO: 
A3B8: 
A30: 
A3C8: 
A3D0: 
A3D8: 


20432C28 
4C442043 
44204420 
20442043 
442C443E 
2C453E4C 
483E4C4A4 
3E4C4420 
4C293E40 
A1 3E4C44 
3E4C4420 
4C442045 
4420452C 
20452C48 
452CAC3E 
2C28484C 
20452C41 
482C423E 
2C433E4C 
4A43E4CA4 
3E4C4420 
AC442048 
44204820 
JE4C4420 
4C44204C 
44204020 
204C2C44 
4AC2C453E 
2C483E4C 
4AC3E4CA4 
4A84C293E 
2C413E4C 
4C292C42 
28484029 
44202848 
3E4C4420 
2C4A53E4C 
4AC292C48 
28484029 
414C543E 
48402920 
20412042 
412C433E 
2C4A43E40 
453E4CA4 
3E4C4420 
4ACA42041 
293E4C44 
SE414444 
SE414444 
3E414444 
3E414444 


484C293E 
2C413E4C 
A23E4C44 
SE4C4420 
4CAAZO44 
44204420 
20442040 
442C2843 
4420442C 
20452042 
452C433E 
2C443E40 
453E4CA4 
3E4C4420 
4ACA42045 
293E4C44 
3E4C4420 
4C442048 
44204826 
20432045 
482C483E 
2C4C3E4AG 
28484C29 
482C413E 
2C423E4C 
433E4C44 
3E4C4420 
4C44204G 
44204C2CG 
204C2C23 
4C44204C 
44202848 
SE4AC4420 
2C433E40 
4AC292C44 
28484029 
44202848 
3E4C4420 
2C4C3E48 
4AC442028 
A1 3E4C44 
3E4C4420 
4C442041 
4420412C 
20412048 
4A12C4C3E 
2C28484C 
20412041 
20412042 
20412C43 
20412044 
20412C45 


152 
IEA 
1E4 
vel 
1E6 
iCHF 
F2 
1 CE 
1DS3 
1E2 
1EO 
1EF 
1E8 
1G7 
1FO 
IDF 
160 
1EC 
ED 
1EB 
1E8 
iFA 
1BD 
1E 
1F4 
1ED 
1CA 
F7 
1DA 
IDA 
iF7 
iCB 
1D1 
1DE 
1B9 
iD3 
iCF 
ID 
iE3 
iF7 
1F8 
1BD 
IDF 
1CB 
1E8 
1ES5 
iD9 
1C5 
1D6 
1D7 
1D8 
iD9 


A3E0: 
A3E8: 
A3FO: 
A3F8: 
A400: 
A403: 
A4A10: 
A418: 
A420: 
AARS: 
A430: 
A433: 
A440: 
A448: 
A450: 
A458: 
A460: 
A468: 
A4ATGO: 
Â478: 
A4A80: 
A438: 
A490: 
A4983: 
A4A0: 
A4A8: 
A4BO: 
A4B8: 
A4CO: 
A4C8: 
AA4ADO: 
AADS: 
A4AEBO: 
A4ARB: 
A4AFO: 
A4AFS: 
A5Q0: 
A5OS8: 
A510: 
A518: 
A52: 
A5238: 
AB5B30: 
A538: 
AB40: 
A543: 
A550: 
A558: 
A560: 
A563: 
A5TO: 
A578: 


3E414444 
JE414444 
3E414444 
484C293E 
412CA13E 
412C423E 
412C433E 


412C443E 


412C453E 
412C483E 
412C4C3E 
41202848 
44432041 
55422042 
20433E53 
3E535542 
55422048 
204C3E53 
484C293E 
413E5342 
42355342 
433E5342 
AASE5 342 
AS53E5 342 
483E5342 
4AC3ES342 
28484029 
20412041 
20423E41 
3E414E44 
4AB442045 
20453E41 
SE414E44 
293E414E 
584F5220 
5220433E 
44A3E5B4AF 
584F5220 
52204035 
28484029 
20413E4F 
4AF522043 
443E4AFS2 
5220483E 
3E4F5220 
3E4F 5220 
20423E43 
43502044 
453E4350 
5O2040C3E 
4AB4AC293E 
3E524554 


20412C48 
20412C4C 
20412C28 
41444420 
41444320 
41444320 
41444320 
41444320 
41444320 
41444320 
41444320 
ACZISE41 
2C413E53 
3E535042 
55422044 
20453E53 
3535542 
55422028 
53554220 
4320412C 
4A320412C 
43204126 
43204126 
43204120 
43204126 
43204120 
3E534243 
SE414E44 
4AE4420453 
20443E41 
JE414E44 
4AE44204G 
20284840 
4420413E 
4A23ES84F 
584F5220 
B220453E 
483E584F 
584F 5220 
JEBSAFBE 
5220423E 
SE4F 5220 
ZO453E4F 
AFS22040 
28484029 
413E4350 
5020453E 
35435020 
20483E43 
43502028 
43502041 
204ESASE 


1DG 
1E0 
1BC 
1E4 
1D4 
1D5 
1D6 
1D7 
1D8 
iDB 
LDB 
ED 
1E6 
221 
IEF 
21E 
227 
1D 
205 
1E4 
iE5 
1E6 
1E7 
IES 
1EB 
LEF 
1FB 
IDE 
1D6 
iF4 
208 
1E5 
IED 
1D9 
240 
206 
21E 
246 
215 
21 
1EO 
203 
215 
205 
1E4 
gt 
1D4 
ES 
IFF 
TOS 
LEF 
22E 


183 


A580: 
A53838: 
A590: 
A593: 
AS5AO0: 
AS5A8: 
ABBO: 
A5B8: 
A5CO: 
A5C8: 
AS5DO: 
A5D8: 
A5EO: 
ADEB: 
A5FO: 
ABF8: 
A600: 
A603: 
A610: 
A618: 
A620: 
A628: 
A630: 
A6 38: 
A640: 
A648: 
A650: 
Â658: 
A660: 
A5668: 
A670: 
A678: 
A680: 
A683: 
A690: 
A698: 
ABAD: 
AGAJ: 
ASBO: 
A6B8: 
ASCO: 
A6C8: 
ASDO: 
ABD8: 
ASEO: 
ÂBEB: 
A6FO: 
A6F8: 
ATOO: 
A708: 
A710: 
A718: 


184 


50O4F5020 


5O204E5A 
6020C23E 
204E5A2C 
53482042 
4420412C 
54203030 
205A3E52 
50O205A2C 
203E4341 
2CC23E43 
C23E4144 
C13E5253 
3E524554 
504F5020 
50204E43 
55542028 
2C413E43 
AE432CC2 
48204445 
20C13E52 
303E5245 
4558583E 
2CC23E49 
28C12020 
ACAC2043 
20203E53 
2CC13E52 
383E5245 
3E504F50 
AA502050 
45582028 
A84C3E43 
504F2CC2 
4820484C 
20C13E52 
303E5245 
3E4A5020 
3E4A5020 
3E455820 
4C3E4341 
452CC23E 
584F5220 
54203238 
20503E50 
463E4A50 
3E44493E 
20502CC2 
48204146 
C13E5253 
3E524554 
44205350 


4AZ4A33E4A 


aCCAIE4A 
4341 4C4C 
C23E5055 
433E4144 
C13E5253 
JE524554 
ASS43E4AAÁ 
C23EC420 
ACAC2Z05ÀÁ 
4A14C4C20 
4320412C 
54203038 
204E433E 
4445 3E4A 
2CC23E4F 
G1202029 
414C4C20 
3E505553 
3E5B35542 
53542031 
5420433E 
4A5020453 
4AE20412C 
293E4341 
2CC23ECS 
42432041 
53542031 
5420504F 
2048403E 
AF2CC23E 
5350292G 
414C4C20 
JES0O5553 
JE414E44 
53542032 
54205045 
28484029 
50452002 
44452C48 
4C462050 
C620203E 
C13E5253 
3ES24554 
AFSO2041 
20502002 
43414040 
3E505553 
3E4AFS220 
54203330 
204D3E4AC 
2C484C3E 


alg 
23E 
286 
239 
203 
275 
IFD 
22B 
2DA 
1F4 
268 
255 
280 
218 
220 
27G 
2iB 
1E7 
2B5 
219 
269 
iFA 
230 
250 
214 
2EG 
1B7 
275 
220 
21F 
285 
1DD 
20E 
203 
20D 
26Â 
20E 
iDD 
27B 
1F8 
216 
2B5 
2BD 
207 
IFE 
270 
225 
294 
1EE 
27B 
220 
205 


AT720: 
A728: 
AT30: 
A7 38: 
A740: 
A748: 
A750: 
AT53: 
A760: 
A768: 
A77O: 
AT78: 
AT80: 
A788: 
ÂT790: 
A798: 
ATAO: 
ATAB: 
A7BO: 
A7B3: 
A7CO: 
A7C8: 
ATDO: 
ATDS: 
ATEO: 
A7E8: 
ATFO: 
ATE8: 
4800: 
A808: 
A810: 
A818: 
A820: 
A3823: 
A830: 
A838: 
A840: 
A843: 
A850: 
A3858: 
A860: 
A868: 
A870: 
A878: 
A880: 
A888: 
A890: 
A893: 
A8A0: 
A8Â3: 
A8BO: 
A8B8: 


4A50204D 
493E4341 
2CCZ3EGT 
9020C13E 
3338352 
92524320 
3E525220 
20355352 
4C4A9203E 
SE424954 
42495420 
49542032 
54203320 
20342C3E 
SS2CIE4Z 
eC3E4249 
3E524553 
52455320 
45532032 
53203320 
20342C3E 
3520352 
203E5245 
SES34554 
53455420 
45542032 
94203326 
40342C3E 
35203553 
2C3E5345 
3E423E43 
SE48IEA4C 
2393E413E 
20284329 
20284329 
42432048 
SE4C4420 
2020292C 
45473E52 
494D2030 
492C413E 
2C284329 
20284329 
44432048 
JE4C4420 
C2202020 
A554493E 
2C413E49 
2843293E 
28432920 
45204840 
4AC442028 


2CC23E45 
4C4AC20A4D 
20203543 
52535420 
4C43203E 
3E524020 
3ES34C41 
41203E53 
53524020 
20302C3E 
312C3E42Z 
2CSE424I 
3E424954 
42495420 
49542036 
54203720 
20302C3E 
312C3E52 
2C3E5245 
3E5245553 
52455320 
45532036 
5320372G 
20302C3E 
312C3E53 
203E5345 
3E534554 
53455420 
45542036 
b42037 20 
SE443E45 
3E23484C 
4A94E2042 
SE4F5554 
2C4A23E53 
4C2C4243 
28022020 
4A2433E4E 
45544E3E 
JE4AC4420 
4942043 
SE4AF5554 
20433E41 
4AC2C4243 
42432028 
20293E52 
4C442052 
45204420 
AF555420 
443E5342 
aC44453E 
C2202020 


278 
210 
aB4 
288 
1E8 
203 
220 
iFS5 
204 
1D7 
1DC 
1E4 
1FO 
1BD 
1D4 
1CG 
1E2 
1F7 
l1EB 
FA 
1C8 
iDF 
1D7 
1E4 
1FA 
l1ED 
1FD 
1CA 
iE1 
1DS 
206 
20A 
1DE 
1F6 
iB3 
IEA 
218 
1A6 
241 
1D4 
1EE 
iF6 
A2 
1EG 
1C7 
LAB 
222 
1D2 
1EA 
1D7 
1EA 
1FÀ 


A8CO: 
A8C8: 
A8D0: 
A8D8: 
A8EO: 
ASE8: 
A8FO: 
A8FB: 
A900: 
A908: 
A910: 
A918: 
A920: 
A928: 
A930: 
A938: 
A940: 
A948: 
A950: 
A958: 
43960: 
A968: 
A970: 
A978: 
A980: 
A988: 
A990: 
Â998: 
A9AO: 
A9A8: 
A9B0: 
ASB8: 
A9CO0: 
A98: 
A9DO: 
A9D8: 
Â9EO: 
AIE9: 
A9FO: 
AgFâä: 
AAOO: 
AAO0B: 
AA10: 
AA15: 
AA2O: 
AA28: 
AA30: 
AA38: 
AA40: 
AA48: 
AA50: 
AAB8: 


20292044 
20313E4C 
AGZE4IG4E 
43293E4F 
43292C45 
20484026 
44204445 
20202029 
323E4C4Á4 
3E494E20 
293E4F55 
292C483E 
484C2C48 
443E494E 
43293E4F 
43292C4AG 
204B4C2C 
4C443E49 
2843293E 
48402053 
2028C220 
2053503E 
20284329 
20284329 
44432048 
3E4C4420 
C2202020 
44493E43 
4E493E4F 
4CAA4A3E 
4A94E443E 
3E4C4449 
49523E49 
AFS44952 
523E4350 
4E44523E 
3EA0O4142 
4743494A 
51525356 
SB5E5F60 
695A6FTO 
TATBAOAL 
AAABBOBÌ 
BABBOO41 
20204243 
20092020 
4420C920 
44202802 
292CC9JE 
CI3JE4144 
2CC9JEAC 
2C28C220 


4A53E494D 
44204120 
20452028 
55542028 
3E4A144453 
44453E4C 
2C28C220 
3E494D20 
20412652 
48202843 
ba202843 
53424320 
4AC3ES252 
20402028 
55542028 
3E414443 
484C3E5Z 
4AE20462C 
53424320 
BOSE4CAA 
20202029 
A94E2041 
3E4AF5554 
2C413E41 
4C2C5350 
53502028 
20293E4C 
50493E49 
5554493E 
4350443E 
AF55S444 
52354350 
4AE49523E 
3E4C44A44 
4A4523E49 
AFD44452 
43444546 
ABAD4F50 
5758595A 
61626763 
12737879 
A2A3A8A9 
B2B3B8B9 
444420G9 
3E414444 
44453E4C 
20C23E4C 
20202020 
49454320 
A420C920 
4420C920 
20202029 


1D 
1ÂC 
ED 
JEÀ 
1E3 
1F3 
223 
LED 
LDH 
1D4 
1EA 
iD3 
236 
1D9 
IEA 
EA 
204 
1F7 
1CA 
231 
1B3 
205 
1F6 
1Â0 
20A 
iES5 
iF5 
22E 
254 
227 
255 
23Â 
249 
250 
240 
25B 
213 
259 
2AE 
30A 
388 
4CC 
58C 
327 
1D8 
248 
205 
1CE 
256 
2D9 
200 
1BF 


AA6O0: 
AAG8: 
AATO: 
AA78: 
AAB8O0: 
AA83: 
AA90: 
AASS8: 
AAAO: 
AAAB: 
AABO: 
AABS: 
AACO: 
AACH: 
AADO: 
AAD8: 
AAEO: 
AAES: 
AAFO: 
AAF 8: 
ABOO: 
ABO8: 
AB10: 
AB18: 
AB20: 
AB28: 
AB3Ö: 
AB38: 
AB40: 
AB48: 
AB5O: 
AB58: 
AB60: 
AB68: 
ABTO: 
AB78: 
AB80: 
AB88: 
AB90: 
AB98: 
ABAO: 
ABA8: 
ABBO: 
ABB8: 
ABCO: 
ABCS: 
ABDO: 
ABD8: 
ABEO: 
ABES: 
ABFO: 
ABFS: 


3E444543 
45432028 
2020293E 
28C9202B 
3E4C4420 
C8202029 
44442009 
SE4C4420 
202BC820 
4420432G 
C8202029 
442C28C9 
20293E4C 
28C9202B 
3E4C4420 
202BC820 
44204C2G 
C8202029 
28C9202B 
2C423E40 
202BC820 
3E4C4420 
C8202029 
44202809 
20292045 
28CS9202B 
2C483E4G 
202BC820 
3E4C4420 
C8202029 
44204126 
C8202029 
20412028 
2020293E 
412C28C9 
20293E53 
C9202BC8 
53424320 
202BC820 
4AE442028 
2020293E 
28C9202B 
SE4F5220 
C8202029 
28C9202B 
SES24C43 
2BC82020 
432028C9 
20293552 
202BC820 
522028C9 
20293E53 


20C93E49 
C9202BCB 
44454320 
C8202029 
28C9202B 
2CC13E41 
20205350 
422C28C9 
20293E4C 
28C9202B 
3E4C4420 
202BC820 
44204520 
C8202029 
482C28C9 
20283E4C 
28C9202B 
3E4C4420 
C8202029 
44202309 
20292043 
28C9202B 
2C443E4C 
202BC820 
3E4C4420 
C8202029 
442028C9 
20292C4G 
28C9202B 
2C413E4C 
28C9202B 
3E414444 
C9202BC8 
41444320 
202BC820 
55422028 
2020293E 
41202809 
20293E41 
C9202BC8 
5845220 
C8202029 
28C9202B 
3E435020 
CB202029 
2028C920 
29315252 
202BC820 
4AC202809 
20293152 
20280820 
4C412028 


27A 
2B5 
193 
26D 
22Â 
29D 
260 
24D 
206 
20F 
21F 
294 
1Â8 
26D 
253 
206 
218 
A1F 
26D 
24D 
1EB 
22Â 
&2B 
288 
1Â8 
26D 
253 
1F4 
22Â 
228 
20D 
238 
291 
i8F 
291 
1B9 
283 
256 
iFB 
2B6 
1C0 
26D 
23B 
222 
26D 
250 
23E 
287 
236 
200 
296 
1AF 


185 


ACO0: 
ACOB: 
AC10: 
AC18: 
AC20: 
AC28: 
AC30: 
AC35: 
AC40: 
AC48: 
AC50: 
AC58: 
AC60: 
AC68: 
AGCTO: 
AC7T8: 
ACBO: 
AC88: 
AC90: 
AC98: 
ACAO: 
ACAB: 
ACBO: 
ACB8: 
ACCO: 
ACC8: 
ACDO: 
ACD8: 
ACEO: 
ACES: 
ACFO: 
ACF8: 
ADOO: 
ADO8: 
AD10: 
AD18: 
AD20: 
AD28: 
AD30: 
AD38: 
AD40: 
AD48: 
AD50: 
AD58: 
AD60: 
AD68: 
AD7O: 
AD78: 
AD80: 
AD88: 
AD90: 
AD95: 


186 


C9202BC8 
53524120 
C8202029 
20280920 
29355352 
202BC820 
49542030 
2BC82020 
5420312C 
C8202029 
20322C28 
2020293E 
33202809 
20293E42 
20280920 
293E4249 
28092025 
3E424954 
C9202BC8 
42495420 
202BC820 
45532030 
2BC82020 
53203120 
C8202029 
20322C28 
2020293E 
332C28C9 
20293E52 
2C28C9A0 
293E5245 
28C9202B 
SE524553 
C9202B68 
52455320 
202BC820 
45542030 
2eBC82020 
54203126 
C8202029 
20322028 
2020293E 
33202809 
20293553 
2C28C920 
293E5345 
28CS9202B 
3E534554 
C9202BC8 
53455420 
202BC820 
4AFS02009 


2020293E 
28C9202B 
JES34C49 
2BC82020 
4C2028C9 
20293E42 
20280920 
293E4249 
28C9202B 
SE424954 
C8202BC8 
42495420 
202BCB20 
49542034 
2BC82020 
54203520 
C8202029 
20362028 
2020293E 
372C28C9 
20293E52 
2280920 
293E5245 
28092025 
3E524553 
C9202BC8 
52455320 
202BC820 
45532034 
2BC82020 
53203520 
C8202029 
20362028 
2020293E 
372C28C9 
20293553 
20280820 
293E5345 
28C9202B 
3E534554 
C9202BC8 
53455420 
202BC820 
45542034 
2BC8 2020 
54203520 
C8202029 
20362028 
2020293E 
372C28C9 
20293E50 
3E455820 


283 
242 
257 
264 
269 
LFC 
22A 
225 
20D 
24E 
282 
1Â6 
283 
1BA 
270 
1C7 
26D 
167 
283 
253 
200 
225 
231 
206 
259 
282 
1B1 
283 
165 
2F0 
1D2 
26D 
iD2 
283 
25E 
20D 
226 
232 
20D 
255 
282 
IB3 
283 
1C7 
270 
D4 
26D 
1D4 
283 
260 
20A 
283 


ADAO: 
ADAG: 
ADBO: 
ADB3: 
ADCO: 
ADC8: 
ADDO: 
ADDS: 
ADEO: 
ADEB: 
ADEO: 
ADF3: 
AEOO: 
ALO8: 
AE10O: 
AE18: 
AE20: 
AEZS: 
AE3O: 
AE38: 
AE40: 
AE48: 
AE5O: 
AK5S: 
AEBO: 
AE68: 
AE7O: 
AE7S: 
AE80: 
AE88: 
AES9O: 
AE9S: 
AEAO: 
AEAS: 
AEBO: 
AEB8: 
AECO: 
AECS: 
AEDO: 
AED8: 
AEEO: 
AEES: 
ÂEFO: 
AEFS: 
AFOO: 
AFOÖ: 
AE10: 
AF18: 
AF2O: 
AF28: 
AF 30: 
AF38: 


28535029 
55534820 
2028C920 
2053502C 
21222329 
3639464E 
70717273 
B68E969E 
CBCBCBCB 
CBCBCBCB 
CBCBCBCB 
CBCBCBCB 
E1E3E5E9 
00000000 
00000090 
00000000 
00000000 
060E181E 
464E565E 
868E969E 
CE6CEDEDE 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000A0D 
A2594D4F 
312E3129 
20535020 
20202049 
484C2020 
20204243 
OAOD2E2A 
20202020 
20202020 
20202020 
20202020 
3E3F3F3F 
2E2E2E22 
00492E0D 
20202020 
20202020 
00202020 
20202020 
20200000 
4156494E 
OAOD2053 


eCCI3E50 
CIIE4AS50 
293E4C44 
C93E0919 
2A2B3435 
S6SEGGGE 
74757717E 
AGAEBGBE 
CBCBCBCB 
CBCBCBCB 
CBCBCBCEB 
CBCBCBCOB 
F9000000 
00000000 
00000000 
00000000 
00000000 
252E363E 
666E767E 
ASAEBSBE 
EGEEF6FE 
00005630 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
00000000 
20484552 
4E202856 
OAOD2020 
20204959 
58202020 
20444520 
20202041 
20002020 
20202020 
20200020 
20202020 
20202000 
3E20222E 
OOOAOD2E 
2E002020 
20202020 
20202000 
20202020 
20202020 
OAOD2053 
AT73A2000 
45415243 


277 
2B1 
228 
218 
14D 
28B 
3A4 
510 
658 
658 
658 
658 
48B 
000 
000 
000 
000 
110 
310 
510 
710 
086 
000 
000 
000 
000 
000 
000 
000 
000 
116 
223 
110 
1C5 
161 
19D 
166 
OCF 
100 
OEO 
100 
OEO 
1Â9 
OF1 
OF2 
100 
OEO 
OBO 
100 
OCA 
iCF 
1Â5 


AF40: 
AF43: 
AF5O: 
AF53: 
AF60: 
AF668: 
AF7O: 
AF78: 
AF80: 
AF88: 
AFa0: 
AF98: 
AFAO: 
AFAB: 
AFBO: 
AFB8: 
AFCO: 
AFC8: 
AFDO: 
AEFDS8: 
AFEO: 
AFB8: 
AEFFO: 
AFF8: 
BO0O: 
B008: 
BO10: 
B018: 
B020: 
B028: 
BO30: 
BO 38: 
B040: 
B048: 
BO5O: 
B058: 
B960: 
B068: 
BO070: 
B078: 
BO80: 
B088: 
BO80: 
B098: 
BOAO: 
BOAB: 
BOBO: 
BOB8: 
BOCO: 
BOC8: 
BODO: 
BODS: 


4A84G4E4T 
OD20464F 
20000A0D 
A4AAG4AKA4T 
OD202A2A 
52242400 
34353637 
43444546 
3ASOAEBT 
FSCDAS500 
F3CD4A00 
AF237EB7 
O3AF18F6 
F1CD5601 
FCCDS9F00 
AFFE7BDA 
FE61DACT 
A200FEOD 
SCAF4FOG 
57CB3FCB 
SEFCDCFAF 
EGOFCDCF 
CICDDBAF 
7CAF3A58 
3E20C37G 
18F6CD7G 
SEAEO680 
C220B03E 
SE31CD7C 
14B0C910 
00040001 
SEOSFSOA 
O33EFFB7 
5230D245 
C630OCDTG 
3ABOC300 
BO7BCDOF 
TACDF1AF 
DAAE3AST 
TBCDF1AF 
CO003E00 
3FC37CAF 
18FAC118 
11280034 
1OFD3ADD 
FDC3921DD 
BOC390AF 
18F4E6OF 
FE3038CE 
FE3A38EE 
D63718E6 
D63718DE 


3A20000A 
554E443À 
204CAFA1 
3A20000A 
4552524 
30313233 
38394142 
FSCDAZ00 
CABEAFF1 
F1C9F1C9 
FBC9CD7C 
20F8CH21 
21FDAE1S 
3EOOS32AT7 
FE7FCACT 
COAF3EOO 
AFD620CD 
20DECS921 
OOOITECI 
JECBSFCB 
3257AE7TA 
AF3258AE 
3A57AECD 
AEC37 CAF 
AFCDF1AF 
AF18F132 
SASEAEAO 
30C322B0 
AFCB38C2 
27E80364 
00012BB0 
5FO30A57 
C5444DED 
B06069C1 
AFF13DG2 
BOTACDOF 
BOC300B0 
SAS58AE32 
AE3259AE 
C300BOCD 
3251 AE3E 
C118FOC1 
FA21D8FF 
DCF34719 
F3472310 
F334CD95 
21DDF335 
CSCDAABO 
FE4730CA 
FE4138C2 
FE3A38E2 
3E0O1B709 


18A 
1E3 
1353 
186 
1B9 
16C 
1CÂ 
376 
4ET 
SDB 
517 
409 
3A4 
326 
576 
AAF 
Dre 
395 
200 
440 
43B 
478 
529 
459 
AB9 
441 
378 
395 
426 
313 
OET 
205 
43Â 
SDE 
ADE 
3B3 
A2ZÀ 
459 
380 
528 
26D 
4B7 
ADD 
2A2 
391 
DAD 
4AD8 
4F1 
AT3 
497 
45D 
32 


BOEO : 
BOES: 
BOFO: 
BOE8: 
B100: 
B108: 
B110: 
B118: 
Bles 
B128: 
B130: 
BL39: 
Bi40: 
B148: 
B150: 
B158: 
B160: 
B163: 
B170: 
BLI78: 
B180: 
B183: 
B190: 
B198: 
B1A0: 
B1A8: 
BiB0: 
B1B8: 
B1C0: 
B1C8: 
B1D0: 
B1D8: 
B1EO: 
BIES: 
B1FO: 
BIES: 
B200: 
B208: 
B210: 
B218: 
B220: 
B228: 
B230: 
B238: 
B240: 
B248: 
B250: 
B258: 
B260: 
B268: 
B270: 
B278: 


3EOOB7 CS 
FE4730F0 
FE4138E68 
AE473A6G 
C2EOBO3A 
69AEB338 
27CB27GB 
CDBDBOCD 
AECDBDBO 
BO 3266AE 
20C28EFB0 
CDOFB1 3 
BO475A68 
AECDBDBO 
67 AECDBD 
AEBO 3267 
18B100C9 
4B67 AEED 
CD35B1ED 
436BAEC9 
4B67AEED 
D1D1C9CD 
CDD80OFE 
OOCDD500 
CSCD8EB1 
CI2A69AE 
FSFETE30 
AE7E3256 
Z2A69AE2S 
52AE3D32 
AEC9CD8B 
OABOEDSB 
BOCDASB1 
B6B1CDA9 
CDB6B1CD 
AECDB6B1 
FAAEGCDB6 
C3JAAFZA 
AECDDZB1 
F8CSA4AF 
AABOFEZO 
BOCD7OB] 
23137EFE 
CI11CEAE 
AE18F6CD 
AE18EE3A 
BEB247CD 
BOCDOOBO 
BO21CEAE 
53AE3C32 
53AE47 3E 
CS9CDIEB2 


FE30O38F4 
FESAS38P0 
18EA3AGA 
AEB838D6G 
GBAE47 3A 
D318CDCB 
27CB27C8 
OFB13266 
AT3A65AE 
CDAABOFE 
CS9CDBDBO 
68AECDBD 
ÂEBO3268 
CDOFB1 32 
BO47 3467 
AE18CDCD 
CD35B1ED 
4369AECI 
AB67AEED 
CD35B1ED 
A36DAEC9 
A4AF3E00 
FE28F73E 
FEOO20E8 
OOCSJEZE 
7EFE2058 
F1C92A69 
AEGDO SBO 
2269AE3A 
ScÂL3A56 
B13E3ACD 
69AECD68 
32FTAECD 
B132F8AE 
A9B132F9 
CDASB1 32 
B121F5AÂE 
6SAE226D 
CDF6BO28 
CD64B1CD 
28E5CDB4 
18E37E12 
SEC22EDE 
18FO21DF 
SEBZ21F1 
SZAEB7CA 
OOBOCDOO 
10F5CDOO 
C39AAF3À 
D3AEC93ÀÁ 
O03253AE 
CDB6B1CB 


418 
4C5 
405 
415 
426 
43A 
3C6 
45F 
ATD 
51B 
524 
45P 
391 
4AT 
437 
457 
432 
470 
AED 
4C5 
474 
4C9 
AFF 
SAS 
40A 
SDE 
AEE 
SE4 
2DT 
2FF 
4C5 
44E 
STB 
566 
586 
535 
SÂ0 
JDA 
599 
5BD 
506 
429 
392 
45E 
4BB 
46F 
3A1 
3FE 
493 
Jr 
2B9 
585 


187 


B280: 
B288: 
B290: 
B298: 
B2A0: 
B2Â3: 
B2B0: 
B2B8: 
B2C0: 
B2C3: 
B2DÔ: 
B2D8: 
B2E0: 
B2E8: 
B2FO: 
B2F8: 
B300: 
B308: 
B310: 
B318: 
B320: 
B328: 
B330: 
B338: 
B340: 
B348: 
B3560: 
B308: 
B360: 
B368: 
B370: 
B378: 
B380: 
B388: 
B390: 
B398: 
B3A0: 
B3A8: 
B3B0: 
B3B8: 
B3C0: 
B3C8: 
B3D0: 
B3D8: 
B3EO: 
B3E8: 
B3FO: 
B3F8: 
B400: 
B408: 
B410: 
B418: 


188 


SFCB3FCB 
2143A7B8 
TEFE3EG2 
B23A53AE 
23CD39Be 
07CDT7TZB& 
CACSB223 
BDB2CD6 7 
B8C2B3B2 
ESCDB6B1 
233A5T7AE 
ÂE77C9ES 
S8AE325A 
3259AECD 
CDB2233A 
JASAAET7 7 
BiEI3E26 
T71233ASB 
SCAE77C9 
2AGJAEAF 
BS3EFFC3 
417097D32 
D8AFE13E 
a3ESJASE 
E1C3D1B2 
B6B1CD72 
TEZSFEOO 
CABGEB3FE 
CD67B23E 
B32124A8 
CA85B323 
7DB3CD67 
B8C273B3 
a1lCEABTE 
B2B7 2302 
CEAE237E 
AFFEC9C2 
AF77233A 
97B3CDBE 
J25CAESÁÂ 
AECDB6B1 
C243B23A 
B22106ÂE 
EOB3CD6 7 
C2D4B321 
B2B8CAFF 
SEC2F7BS3 
53AEB8C2 
39B2CDIT 
TEFECSCA 
C208B4C9 
B6B1FECB 


SFCD72B2 
CAAIB223 
99B2CDET 
B8C28FB2 
SASBAEEG 
211iA8B8 
TEFE3EC2 
B23A53AE 
23C32EB2 
E13E2477 
71233458 
CDB6B13A 
AE3AS5T7AE 
B6B1E1CD 
SIAE7723 
CIESCDB6 
18C93E26 
ÂAE77233A 
ESCDB6B1 
E680CA26 
28B33E00 
SEAE7 CCD 
AOCDCFB2 
AECDDSAF 
CD3EB2CD 
B221E1A9 
CA43B2B8 
OOCA43B2 
O1B7C250 
CD6FB2B8 
TEFESEC2 
B23A53AE 
23CD39B2 
FEG2CADB 
8SBB3C921 
FEOOCA9S5 
JABSSAOÏ 
O2ÂF77C3 
B13A58AE 
S7AESZ5B 
E607FEO6 
S6AECD7 2 
TEZ3B8CA 
B23E01B7 
1BAACD6F 
B3237EFE 
CD67B23À 
EDB323CD 
B321CEAE 
O6B3B723 
CD3EB2CD 
CAB2B3CD 


444 
403 
AFB 
4A3 
JEF 
38A 
4EQ 
490 
4A5 
4D3 
28E 
541 
STE 
51B 
37D 
ARA 
33B 
2B1 
563 
3E6 
SCC 
354 
534 
4AZ 
5B1 
503 
416 
4A0 
3EE 
446 
4AA1 
451 
47 B 
580 
476 
ATA 
4C0 
36E 
ABE 
308 
4D3 
434 
JAA 
46E 
46B 
585 
4CA 
50B 
ASF 
4A1 
4D1 
B2G 


B420: 
B428: 
B4A30:. 
B438: 
B440: 
B448: 
B450: 
B458: 
B460: 
B468: 
B470: 
B478: 
B480: 
B4388: 
B490: 
B498: 
B4AA0: 
B4A8: 
B4B0: 
B4B8: 
B4GO: 
B4C8: 
B4DO: 
B4D8: 
B4EO: 
B4E8: 
B4FO: 
B4F8: 
B500: 
B508: 
B510: 
B518: 
B520: 
B528: 
B5305 
B558: 
B540: 
B548: 
B550: 
B558: 
B560: 
B568: 
B510: 
B578: 
B580: 
B588: 
B590: 
B598: 
B5A0: 
B5Â8: 
B5BÖ: 
B5B8: 


12B221BE 
OOCA43B2 
FEOOCA4S3 
3EO1B7C2 
AACD6GFB2 
237EFE3E 
67B23A53 
B423CD39 
3E01325D 
TEFEC8C2 
B23E0032 
B723C268 
FEOOCAS88 
TEFEC1CA 
CADBB2B7 
CI3E5832 
B43E5932 
B421CLAE 
COB2FEG2 
C3CA14B3 
B2FECSCA 
CA44AB3FE 
BT23C2AC 
BiCD73B2 
SGAE473A 
FCB4237E 
B4ACD67B2 
C2EAB423 
SBBI3E3D 
SB69AECD 
B23E0432 
B4ACDAS9B4 
SIAE2322 
B4CDF6BO 
AFCD64B1 
2028E4CD 
B118E3F1 
JA7SAETT 
CIZABIAE 
232269AE 
T1AE7723 
ED4B69AE 
B7ED427D 
B57CFEOO 
88B57 CFE 
7TDZA6SAE 
AECS0600 
19AF1ABE 
JECAABBS 
C2A4B5 13 
2313FE3E 
OO325FAE 


ADTE23FE 
BSCA3BB4 
B2CD67B2 
25B4211B 
B8CASAB4 
C252B4CD 
AEB8C248 
B2CD97B3 
AE21CEAE 
TSB4ACDFD 
SDAE3EOO 
B43ASDAE 
B421CEAE 
CSB2FEC2 
23C288B4 
OZAFCS14 
OZAFC314 
TEFEC1CA 
CADBBZFE 
FEC4CAT79 
I9BAFECE 
CTCAAIB4 
B4AC9CDB6 
2100A03A 
S3ÂEBSCA 
FESEC2F4 
3A53AEBS 
CII9BECD 
CDOABOED 
68BOCD3E 
5B2AECDD6 
C34BB22A 
BBAEGDFE 
28F8C3A4 
CDAABOFE 
B4ABOCD7 0 
CIZA6GIAE 
232269AE 
3ATZAE?77 
2A69AE3A 
2269AEC9 
eÂTIAEZB 
E680C282 
C28CB0C3 
FFC28CBO0 
17232269 
11004021 
CABOBSFE 
1SLAFE3SE 
0420E8C9 
C29AB53E 
AA6GIAE 73 


AAF 
430 
4A3 
2CD 
528 
AT2 
416 
4A6 
919 
SFC 
26B 
SFD 
AAL 
641 
DeF 
319 
305 
598 
68F 
559 
650 
5A5 
548 
39E 
408 
543 
48D 
4FE 
A29 
462 
3C9 
4CS8 
A41 
SAE 
5B6 
4JA 
AAT 
330 
3DB 
2D7 
3BB 
3CB 
SOD 
AFO 
SB4 
2E3 
24E 
ACD 
3D1 
403 
SCI 
2F8 


B560: 
B5C8: 
B5D0: 
B5D8: 
B5EO: 
B5E9: 
B5FO: 
B5ES : 
B600: 
B608: 
B610: 
B618: 
B620: 
B628: 
B630: 
B638: 
B640: 
B648: 
B650: 
B658: 
B660: 
B668: 
B670: 
B678: 
B680: 
B688: 
B690: 
B698: 
B5A0: 
B6A8: 
B6B0: 
B6B8 : 
B6CO0: 
B6C8: 
B6D0: 
B6D8 : 
B6EO : 
B6E8: 
B6FO0: 
B6F8: 
B700: 
B708: 
B710: 
B718: 
B720: 
B728: 
B730: 
B738: 
B740: 
B748: 
B750: 
B753: 


17232269 
FEOOCAS1 
FEOOCA45 
FEOOCA68 
A801E1A9 
BECAFFBS5 
B5131AFE 
13030AB7 
13FE3EC2 
325FAE2A 
11232269 
OAT7232E 
AEFEOOCA 
1BAAOIBE 
1ABECA48 
41B6131Â 
B613030A 
2J13FE3E 
OO3Z5FAE 
63AE7 723 
6IAEOATT 
2269AE3ÀA 
C27EB63A 
AET72322 
AEFEOOCA 
AEFEOOCA 
AEFECBC2 
0O0OOST7E2ZA 
2269AEC9 
O02118AF 
B7FE3EC2 
TDAE111À 
TDAELABE 
lAFE3EC2 
13FEO820 
i3FE3EC2 
O0325FAE 
CB772322 
AECB20CB 
BO772322 
12B7131A 
B7130478 
B6C92313 
B6CICB2T 
CB274769 
TTEB3E2Z0 
CI2106AF 
95AFFE24 
O01171AE 
BO20E37E 
13043504 
CDZ4B7 3E 


AESABOAE 
B53A61AE 
B53A62AE 
B5C91124 
2119AF1ÀA 
FE3ECAF8 
3EC2F1B5 
20E6CI23 
E7TB53E00 
69 AESEED 
AEZAG9AE 
6IAE3A6O 
S1BSCS911 
AD2118AF 
BEFESECA 
FE3EC23A 
B720E6C9 
C230B63E 
2A69AE3ÀA 
2269AEZÀ 
3263AE23 
65AEFEOO 
BIAE2A69 
GIAE3AOO 
S1B53AB1 
45B53A63 
95AF2148 
6IAE7 723 
1143A706 
1ABECAIZ 
O2B7D522 
A80OEOOZA 
CAD7B613 
C7B6130C 
EAD1C923 
C2B6D1 3E 
2AGIAESE 
69AE2A69 
20CB2079 
69AEC3C3 
FE3EC202 
FE20G2A9 
FE3EG2AG 
CB27CB27 
3E20772B 
172B7T72B 
TEFEOOCA 
C280B706 
237ECDE4 
CDD4B012 
B8C244B7 
C2773E00 


31B 
417 
40C 
SES 
336 
63A 
486 
209 
SEB 
JAB 
314 
277 
456 
JlÂ 
AAG 
35C 
35G 
358 
2BA 
SOE 
2FE 
384 
3F2 
31B 
417 
40D 
4AE6 
262 
303 
2D 
465 
22D 
46D 
sB4 
446 
498 
2BE 
331 
3E8 
40F 
2F6 
SCF 
ASF 
455 
302 
244 
3E5 
465 
J82 
49A 
2CE 
35D 


B760: 
B768: 
B770: 
B778: 
B780: 
B788: 
B790: 
B798: 
B7A0: 
B7 A8: 
B7BO: 
B7B8: 
B7CO: 
B7C8: 
B7D0: 
B7D8: 
B7EO: 
B7E8: 
B7FO: 
B7EFS: 
B800: 
B808: 
B810: 
B818: 
B820: 
B828: 
B830: 
B838: 
B840: 
B843: 
B850: 
B858: 
B860: 
B868: 
B870: 
B878: 
B880: 
B888: 
B890: 
B898: 
B8A0: 
B8A3: 
B8B0: 
B8B3: 
B8C0: 
B8C8: 
B8DO0: 
B8D8: 
B8EO: 
B8E8: 
B8F0: 
BSF8: 


S260AE3A 
B73A72AE 
SAT SAECD 
AEBO3272 
23C334B7 
FEOOCA95 
D3B70600 
TECDE4BO 
D4B01213 
C297B7CD 
T73E0032 
AECD1ABT 
S27AAE3A 
B73A7CAE 
C384B723 
OGAFTEFE 
FE24C219 
75AE237E 
ESTECDD4 
SEO2B8C2 
B73EC177 
AESA7 5AE 
T6AEBO32 
B723C3DA 
TEFEOOCA 
CESFB806 
23T7ECDE4 
CDD4B012 
B8C230B58 
C8773E00 
81AECDIA 
BO3281AE 
C320B821 
OOCAS9BAF 
B8237EFE 
JEDD3263 
FES9C28D 
63AEC38F 
20772B3E 
3264AE18 
2106AF11 
23137EB7 
JE121B1A 
B8CSI2A6F 
JEIECD7G 
CDSFAF3E 
EDS5B69AE 
O0O3251AE 
2269AE3E 
CD26B5CD 
S251AECY9 
GIAE3ZEIE 


T1AECD1Á 
BO3271AE 
JAB73A7 4 
ÂEC331B7 
2106AF7E 
AFFE40C2 
1179AE23 
20E97ECD 
O43EO4B8 
24B73EC3 
62AE3A79 
3Â7AAEBO 
TBAECDIA 
BO3279AE 
C387B721 
OOCAS5AF 
B8060011 
CDE4B020 
BO121304 
EAB7CD2A 
JEOO3261 
CD1AB73A 
TSAEC3D7 
B72106AF 
SSAFFE2G 
O0O1181AE 
BOZOE97E 
13043E08 
CD2AB7 3E 
3265AE3A 
B73A02AE 
C31DB823 
O6GAFT7EFE 
FE49C2S9D 
58C280B8 
AEC38FB8 
B8SEFDS2 
B818D73E 
C9773EOO 
C62318C6 
19AF7E12 
C2A6GB83E 
FE2OCAAF 
AE2Z269AE 
AFCDIFBS 
41CDOABO 
CD6BBO3E 
CIZACFAE 
1ECDT7TCAF 
QFAFSEOO 
2A6FAE22 
CD7CAFCD 


380 
412 
SAT 
45B 
325 
500 
2EB 
533 
2AT 
4B9 
2AA 
45E 
JA4 
424 
443 
ASF 
206 
445 
3E1 
452 
2FE 
3E3 
4C3 
404 
AAE 
31F 
A89 
2BÂ 
44E 
2FO 
437 
306 
3ED 
AB4 
4A9 
468 
ACB 
448 
27E 
323 
23E 
3C9 
31C 
401 
3F5 
421 
482 
341 
38D 
401 
363 
438 


189 


B900: 
B908: 
B910: 
B918: 
B920: 
B928: 
B930: 
B938: 
B940: 
B9458: 
B950: 
B958: 
B960: 
B968: 
B970: 
B3978: 
B980: 
B988: 
B990: 
B998: 
BS9A0: 
B9A8: 
B8B0: 
B9B8: 
B9C0: 
B9C8: 
B9DO0: 
B9D8: 
B9EÖ: 
B9E8: 
B9FO: 
B9F8: 
BAOO: 
BA08: 
BA1O: 
BA18: 
BA20: 
BA23: 
BA30: 
BA38: 
BA40: 
BA48: 
BA5O: 
BA58: 
BA60: 
BÂ68: 
BA7O: 
BA793: 
BA80: 
BA88: 
BA90: 
BA98: 


190 


OBB2CD9F 
OABOEDSB 
BO3E0032 
64B11106 
BOD11213 
35013260 
3262AE32 
AE325FAE 
D7B7CD84 
2A6SAEZZ 
BS53A5FAE 
BSCDDEBS5 
OCOCABABS 
DFAEFEOO 
1DB8CD63 
CD27B63Â 
CABAB83E 
C37FBOCD 
ÂE226FAE 
AECDSFBI 
66AE7723 
AABOFEZO 
S5AE3C32 
CADDBSCD 
CD64B12A 
AESEOO32 
B12A69AE 
232269AE 
2OCAF4B8 
S25B6AEFE 
CDB4B018 
CDIAAFED 
GSBOEDSB 
BOEDSB89 
EDSBSBAE 
SB8DAECD 
SFAECD68 
CDF1AFC3 
OOFD2287 
AE228BAE 
ED438FAE 
FSB9CD64 
222FBA3A 
SFAEEDSB 
AEDD2A89 
AE18C3C3 
Bl2A69AE 
S1AEED4B 
SDAEZA8B 
AEFD2A87 
AE18D8CD 
AE2285AE 


AF3E3ACD 
69AECD68 
51AECS9CD 
AFDSCDAA 
1AB720F5 
ÂE3261AE 
64AE 3265 
CD31B70D 
B7CDAOBS 
GFAECDS2 
FEOOCABA 
SASFAEFE 
CDA4B63À 
CABAB8CD 
B8CDA0OB8 
SFAEFEOO 
O932DDF3 
GAB12A69 
3EO03256 
ZA6IAE3A 
e269AECD 
CADDB83A 
SEAEFEO4 
B4B018D9 
69AE226F 
SSAECDSF 
JA6GGAET 7 
CDAABOFE 
3AS56GAES3C 
OACAFABS 
D92192AE 
SB85AEGD 
87AECD68 
AECD68B0 
CD68BOED 
68BOEDSB 
BOSA91AE 
A4AFCDOO 
AEDD2289 
ED538DAE 
3291AEC3 
Bi2A69AE 
SlAEED4B 
SDAEZASB 
AEFD2A87 
O0OOCD6A4 
228CBA3A 
SFAEEDSB 
AEDD2A89 
AEED7B85 
64B12A469 
CD64B12A 


A1D 
44E 
3B5 
A2T 
38G 
200 
31D 
46F 
5BB 
3DF 
47E 
55D 
49D 
514 


AE2 
SEF 
485 
467 
288 
406 
JB4 
511 
378 
581 
3B4 
SAE 
3B7 
481 
410 
4 AE 
483 
55E 
4CA 
514 
553 
4C3 
49B 
550 
3DG 
484 
4A1 
4D1 
3B6 
475 
4JA 
37D 
374 
AFG 
42E 
4F7 
413 
4AOF 


BAAO: 
BAAS: 
BABO: 
BABS: 
BACO: 
BAC8: 
BADO: 
BAD8: 
BAEO: 
BAES: 
BAFO: 
BAF8: 
BBOO: 
BBOS3: 
BB10: 
BB18: 
BB20: 
BB28: 
BB30: 
BB398: 
BB40: 
BB45: 
BB50: 
BB58: 
BB60: 
BB68: 
BB70: 
BB78: 
BB80: 
BB88: 
BB90: 
BB98: 
BBAO: 
BBA8: 
BBBÔ: 
BBB8: 
BBCO: 
BBC8: 
BBDÔ: 
BBD8: 
BBEO: 
BBE8: 
BBFO: 
BBF3: 
BCOO0: 
BCO8: 
BC10: 
BC18: 
BC260: 
BC23: 
Bea 
BC35: 


GIAEZ287 
2A69AE22 
B12A69AE 
64B12A69 
CD64B12A 
AECDSFB1 
SLAESELE 
TCAFCD7C 
CD64B1CD 
B12A69AE 
232268AE 
FOCSA4AF 
TOB1CD7C 
7TE232269 
1123226D 
23EBC3A4 
GD7OB121 
AE3EO032 
BOFE22C2 
BOZA6DAE 
4AT7TBB3E00 
DDFSFE1E 
0023226D 
34FEOOC2 
SOBBCDB4 
2AODÁAE3A 
226DAE21 
AABOFEZO 
OOB7C38D 
SASBAEFE 
3E0O63254 
226DAEZA 
AESASGAE 
TE2AGDAE 
CAGSAEZS3 
F6B028D9 
6TAE2322 
AEZ23226D 
3A54AE3C 
07C2EEBB 
AFSEODCD 
B13E0032 
6IAECD6S 
232269AE 
95BBC3A4 
3EOACD7G 
TCAF3E25 
SB6SAECD 
CD7CAFED 
68BO3E23 
69AECD35 
3EO83252 


AECD64B1 
89AECD64 
228BAECD 
AE228DAE 
6IAE2Z28F 
JABBGAE32 
CD7CAFCD 
AFC3F5B9 
TOB1CDSF 
3A65AE 77 
CDF6B028 
CD64B1CD 
B12A69AE 
AE2ZA6GDAE 
AECDFSBO 
AFCD64B1 
OSAF226D 
S6AECDAA 
62BBCDAA 
T1FE22C2 
C351BB3A 
C251BB3E 
AE2156AE 
36BB35C3 
BOCDSFB1 
656AE7723 
56AES4CD 
C285BB3E 
BBCDB4B0 
08C265BB 
AE2106AF 
69AE2267 
4T2A6TAE 
BECABFBB 
2269AECD 
C3IA4AAFZA 
67AEZA6GD 
AEO520D5 
S254AEFE 
SEOACDTG 
TCAFCDAI 
S4AEEDSB 
BOZA6G9AE 
CDF6BOCA 
AFCD64B1 
AFSEODGD 
CD7CAFED 
SDBO3E24 
SB6IAECD 
CD7CAFZÁ 
BOC3A4AF 
AECDAABO 


450 
SCB 
41A 
3B3 
SD4 
40OB 
460 
594 
4FC 
3B7 
37 
9B5 
45 
SÌF 
AAA 
50B 
353 
399 
526 
44E 
349 
4AF8 
285 
3DD 
559 
32D 
363 
4B8 
4E 3 
426 
24E 
307 
37e 
4C5 
36A 
AET 
306 
308 
3AA 
403 
460 
J6B 
43D 
499 
548 
358 
473 
SAE 
De4 
39B 
ADE 
3IF 


BC40: 
BC48: 
BCBO0: 
BO58: 
BC60: 
BC68: 
BC7O: 
BC78: 
BCB80: 
BC88: 
BC90: 
BC98: 
BCAO: 
BCA3: 
BCBO: 
BCB9: 
BCCO: 
BCO8: 
BCDO: 
BCD8: 
BCEO: 
BCE8: 
BCFO : 
BCF8: 
BDOO: 
BD08: 
BD10: 
BD18: 
BD20: 
BD28: 
BD30: 
BD33: 
BD40: 
BD48: 
BD50: 
BD58: 
BD60: 
BD68: 
BD7O: 
BD78: 
BD80: 
BD85: 
BD90: 
BD98: 
BDAO: 
BDA8: 
BDBO: 
BDB8: 
BDCO: 
BDC3: 
BDDO: 
BDD8: 


FES3OC24A 
S4BCFE31 
8CBOO0601 
27B03266 
3520DACS 
GAAECD38 
CDAABOFE 
C308BC3E 
21000001 
CDAABOFE 
FE3AD292 
SJAEC1OA 
O3E13A53 
BC193DC2 
AE3C3252 
CD7C326À 
AEC9ICD7B 
FE2OC27F 
CD64B1CD 
ABED4B6GB 
BCC308BG 
7OB12A69 
AEBTED42 
B1CD70B1 
GBAEA6GSFE 
6GCAEA6 57 
64B1CDTO 
216BAEBG 
216CAEB6 
CD64B1CD 
AE216BAE 
AE216CAE 
DEBCCDAA 
8CBO2119 
CSCDAABO 
CABEBD7 7 
B820ECC3 
1723043E 
3E0077CD 
C28CBOC9 
CDFO0OO021 
AFC3A4AF 
OOGDEAOO 
C1C9C5D5 
S8DA18F2 
E40038D0 
ESCDE1OO 
3E0O0O3250 
AECD4AZBD 
AFCD64B1 
2CAFCDSA 
O6GCASE8O 


BCO600C3 
CAS2BCC3 
3A6BAECHB 
AE2Z1524E 
CD38BC32 
BC3269AE 
20C27FBO 
003252AE 
2BBOESCS 
30DA32B0 
BOEBOF32 
5FO30A57 
ÂAEB7CAAE 
AIBC3A52 
AEFEOS520 
AE7D3269 
BCCDAABO 
BOC308BC 
TOBI12A69 
AEOSCDB9 
CD6GABICD 
AEED4B6B 
18E8CD64 
JASSAEZ1 
3AGAAE21 
EB18CFCD 
B13A69AE 
5FSAGAAE 
57EB18B6 
7OB13A69 
AESF3A6GA 
AES7EBCS3 
BOFE22C2 
AFO60O0ES5 
CIELFE22 
23043E11 
8CBO3E20 
12B820F6 
AABOFEZO 
ED7B7DAE 
DFAFCD9A 
CSDSES 3E 
38EBE1D1 
ESCDEDOO 
CSDSESCD 
18E8C5D5 
38C618DE 
AEED737D 
SEOOS21F 
CD7OB121 
AFCDBCBD 
CD9ABD10 


JBF 
ADA 
35G 
33E 
JEB 
422 
536 
27 
2AT 
Dii 
4713 
28F 
44E 
3C5 
33F 
SAB 
DÂZ 
496 
463 
43E 
4AF2 
405 
4AC5 
411 
391 
4B6 
454 
3A1 
401 
473 
399 
49G 
SA3 
310 
SAE 
2DA 
421 
2BG 
SFA 
5SA 
453 
SOZ 
487 
5C3 
568 
486 
487 
34B 
309 
4A0 
507 
302 


BDEO: 
BDE8: 
BDFO: 
BDF8: 
BEOO: 
BEOS: 
BE1O: 
BE18: 
BE20: 
BE28: 
BE30: 
BE39: 
BE40: 
BE49: 
BL50: 
BE58: 
BE60: 
BE68: 
BE7O: 
BE79: 
BE80: 
BE88: 
BE90: 
BE938: 
BEAO: 
BEA8: 
BEBO: 
BEB9: 
BEGO: 
BEC8: 
BEDO: 
BED8: 
BEEO : 
BEES: 
BEFO: 
BEFS: 
BFOO: 
BEFOS: 
BF10: 
BF18: 
BE20: 
BE28: 
BF30: 
BF 38: 
BF40: 
BF45: 
BF50: 
BF58: 
BE60: 
BF68: 
BF7O0: 
BF78: 


F92119AF 
SABD2310 
2ZA6JAEES 
EBB7ED52 
CD8CBDO6 
9ABD7 CCD 
EDSB69AE 
CD9ABD13 
17BECDFO 
69AECD68 
BOCSA4AF 
AEED737D 
3E0O03256 
CDAABOFE 
CDB4BOCD 
3256AE21 
AFZ119AF 
AEBDO60A 
BOC25ABE 
AFOGOECD 
10F93600 
47AFCD9A 
CDSAAFI1 
AFO6061A 
132310F7 
SAAFCDAE 
AABD6FCD 
1OFSD13A 
C6BEED5B 
6GIAEE1CD 
2B7CB5C2 
OODSEDSB 
BOD1CD68 
35013250 
3EOO18F6 
4A2BD2A69 
1ÁÂB7CAOA 
18F6226B 
F5B9C2B6 
93BADOBG 
8BB917B9 
EOBA1DBB 
FCBA43B5 
ESBEFOBE 
28BDF4ABE 
2A2Be2D3A 
4A6484A4D 
50512640 
FAFC37F 
D1ÂECD95 
FE2EC25F 
572110BF 


O6067ECD 
FS9CDFOOO 
EDSB6BAE 
E5226BAE 
O2E17DCD 
OABD1OFS 
2AGBAELA 
2B7CB5CE 
OODSEDSB 
BOD1CD68 
3E003250 
AECD42BD 
AE321FAF 
20CASBBE 
64AB13E01 
S8AFCDIA 
CDSAAFCD 
CDA4BDFE 
10F62106 
A4ABD7 123 
CDE70O021 
AF2106AF 
19AF2106 
BEC25BBE 
2152AFCD 
BDO602CD 
A4BD67E5 
56AEB7CA 
GSAEED53 
A4BD1213 
CBBECDE7 
GIAECD68 
BOC3A4AF 
AEC3A4AF 
CD64AB1CD 
AE11198AF 
BF771323 
AEC311B2 
OBBCB4BG 
E4BCCOB9 
AABA31B5 
6EBAICBZ 
B8BD34BE 
F6BCOFBD 
21232425 
SB414344 
54598534C 
2F5700CD 
BO3E0132 
BOCDS0OAF 
BFCDAABO 
O144BFOA 


339 
440 
487 
501 
449 
AFG 
SBC 
455 
4AF 
502 
386 
505 
274 
928 
452 
JÂ5 
47 B 
4AT 
397 
383 
314 
352 
315 
36E 
32G 
456 
54A 
495 
523 
44B 
55B 
469 
57C 
385 
3FB 
319 
311 
3CF 
SOD 
SF2 
SFE 
468 
515 
5D2 
324 
1BF 
270 
25Â 
3B1 
S1D 
535 
255 
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BF80: BAC298BF 7E326CBA 4A9 BFCO: AEF3CD6G OOCDCGOO 473 
BF88: 237E326D BACDAABO 421 BFC8: CDC3003E OO3250AE 2FE 
BF90: FE20C27F BOC36BBA 4F7 BFDO: CDFSB93E 0O132514E 3EB 
BF98: O32323FE OOC27FBF 347 BFDO: 3A51AEFE O1C2E3BF 49C 
BFAO: C37FBOED 7385AEFD 582 BFEO: CDSFAFCD ASAFCD65 572 
BFA8: 2287AEDD 2283AE22 JAF BFE9: BE18EDFF FEFEFFFFFF 6BF 
BFBO: S8BAEEDS3 SDAEED43 4E4 BEFO: FEEFFFFF FEEEFFFF 7FS 
BFB8: 8FAE3291 AE3E2732 345 BEF8: FEFFFFFOO FEFFFFFF 6F9 


23.2 Werken met de HERBYMON 


10 CLEAR200,&HOFFF : SCREENO : CLS 

20 BLOAD"HERBY . MON" 

30 DEFUSR=49059!:KEY1, "M=USR(0O)"+CHRE(13) 
40 PRINT"F1 —- HERBYMON" : NEW 


Laten we aannemen dat het u is gelukt om de HERBYMON op te starten. 
Waarschijnlijk doet u dit met behulp van een simpele BASIC-loader (listing 23.1) 
of misschien zelfs meteen met behulp van het ‘BLOAD”HERBY.MON”, 
R'-commando. In beide gevallen krijgt u in 40-koloms mode het volgende 
openingsscherm: 


HERBYMON (V1.1) 
SP Ey IX 
.* 9DÌ/ DE92 F58B 


HL DE BC A 
BF96 0007 0500 00 


De hexadecimale waarden kunnen afwijken; daarover straks meer. De uitdruk- 
king ‘HERBYMON (V1.1)’ snapt u wel, maar waar slaan die letters op? Welnu: 
die verwijzen naar de inmiddels welbekende interne Z80-registers. 


SP: 
IY: 


stack pointer (of stapelwijzer) 
index-Y register 
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TX: 


HL: 
DE: 
BC: 


À: 


index-X register 
Hl-registerpaar 

DE-registerpaar 
BC-registerpaar 
accumulator 


De getallen die zich onder dit illustere zevental bevinden, zullen eventueel veran- 
deren onder invloed van uw eigen routines en/of een speciaal HERBYMON- 
commando. Bedenk dat u deze waarden kunt gebruiken tijdens de beoordeling 
van routines in de testfase. 


U heeft 26 commando’s tot uw beschikking. Even in het kort: 


En 


ORTHO 


assembleren 

subroutine-aanroep, met terugkeer in de HERBYMON 
disassembleren 

een geheugengebied met een bepaalde waarde vullen 

een geheugengebied doorzoeken op de aanwezigheid van een gewenste 
reeks tekens 

een sprong vanuit de HERBYMON naar uw eigen programma 
een HERBYMON-file van cassette laden 

een memory-dump in bytes en ASCII 

de printer activeren 

de printer deactiveren 

een stuk geheugen als HERBYMON-file naar cassette saven 
een stuk geheugen verplaatsen 

een stuk ASCII-tekst op een gewenste geheugenplaats schrijven 
verlaten van de HERBYMON 

te voorschijn halen van de interne’ registers 

conversie van een decimale waarde 

conversie van een hexadecimale waarde 

conversie van een binaire waarde 

logische AND op twee waarden 

invullen van de interne registers 

de som van twee waarden berekenen 

het verschil van twee waarden berekenen 

logische XOR op twee waarden 

bytes plaatsen met memory-dump 
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:__— bytes plaatsen met disassemblering 
@) — logische OR op twee waarden 


Van de meeste commando's zult u de syntax en het effect waarschijnlijk al 
vermoeden. Toch krijgt u nog even een nadere uitleg. 


A — ASSEMBLEREN 
Het per regel assembleren van machinecode. U doet het als volgt: 
‚A [startadres] [mnemonic] [operand(s)] 


Tussen elke parameter staat één spatie en na het indrukken van de RETURN- 
toets zal de HERBYMON op twee manieren kunnen reageren: 


1 De syntax wordt geaccepteerd, omgezet en gedisassembleerd. Het gevolg is dat 
u vanaf de volgende (logische) geheugenplaats verder kunt gaan. 

2 U maakte een foutje! En zie, een vraagteken. (In dit geval heeft u een niet- 
bestaande instructie bedacht of zit de vergissing in de operand.) 


Om goed te kunnen assembleren even de volgende wenken. 
Een relatieve sprong geeft u aan met “@).….”’, een index-offset met ‘&.…’ en de 
gewone bytes en words met respectievelijk ‘$…’ en “$….”! 


Bijvoorbeeld: 


„A EOOO DJNZ @E0O0O 

„A EOOO LD (IX+&7F),SFF 
„A EOOO LD HL,S1254 

„A EO0OO0 RET 


TIP: tussen $COO0 en $F380 ligt een prima gebied dat u vanuit BASIC beschermt 
met de opdracht CLEAR200,&hBFFF!) 


C - SUBROUTINE 


U springt naar een zelfgeschreven machinecode-subroutine en keert als alles goed 
gaat weer netjes in de HERBYMON terug. Dat gaat als volgt: 
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‚C [startadres] 


Bijvoorbeeld: 
„.C 00CO 


TIP: maak gebruik van dit commando om gewenste of ongewenste effecten te 
doorgronden. Het is mogelijk om eerst de interne registers te veranderen, dit voor 
optimaal gemak. 


D — DISASSEMBLEREN 


U laat een aantal bytes decoderen naar leesbare Z80-instructies. Dit commando is 
dus het tegenovergestelde van het assembleercommando. Doe het zo: 


‚D [startadres) of 
‚D [startadres] [eindadres] 


Bijvoorbeeld: 


„D 1000 
„D 1000 2000 


(TIP: U pauzeert het disassembleren door op de spatiebalk te drukken. U onder- 
breekt voortijdig met behulp van één van de cursortoetsen.) 


F — FILL of ‘VOL-POKEN’ 
U vult een stuk geheugen met een gewenste byte-waarde: 
.F [startadres] [eindadres] [byte] 


Bijvoorbeeld: 


.F DOOO EOOO OO 


Kijk nu maar met het M-commando naar de inhoud van hetzelfde gebied. 
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TIP: om te weten of uw routines niets verknoeien, kunt u een stuk geheugen vullen 
en dan na afloop kijken of er iets fout is gegaan. 


H - HUNT of ZOEKEN 


U onderzoekt een stuk geheugen op de aanwezigheid van een bepaald teken of een 
bepaalde reeks tekens. Dat kan op twee manieren: 


‚H [startadres) [eindadres] [byte] … [byte] 
‚H [startadres] [eindadres) [string] 


Bijvoorbeeld: 


„H 1000 2000 FF FF 


.H 1000 8000 
BASIC 


TIP: zie de D-tip. Gebruik dit commando om dom zoeken te voorkomen. Handig 
als u niet meer weet waar uw teksten zijn gebleven! 


J — JUMP of ‘SPRINGEN’ 

U springt vanuit de HERBYMON naar uw zelfgeschreven machinetaalpro- 
gramma. Vooraf kunt u nog even de interne registers wijzigen; deze worden 
gekopieerd voordat de sprong in het diepe wordt gemaakt. De syntax: 


J [startadres] 


Bijvoorbeeld: 
.J 0000 


(TIP: spring vanuit de HERBYMON om zeker te weten dat u ‘goed aankomt’… 
Bekijk vooraf altijd even de interne registers!) 


L - LOADEN 


Een file in HERBYMON-formaat(!) van cassette laden. Twee mogelijkheden: 
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‚L [file-naam] of 
.L [fille-naam] [loadadres] 


Bijvoorbeeld: 


sle TEST 
„.L TEST D880 


TIP: HERBYMON-formaat is veiligheidshalve afwijkend van het standaard- 
MSX-formaat. Een file die is opgeslagen vanuit de HERBYMON kunt u ook 
weer binnenhalen. Een ‘vreemde! file leest u in met een BASIC-loader, dus met het 
BLOAD-commando. 

M — MEMORY-DUMP of GEHEUGENDUMP 


U kunt een stuk geheugen bekijken in zowel bytes als ASCII. Op twee verschil- 
lende manieren: 


.M [startadres] 
‚M [startadres] [eindadres] 


Bijvoorbeeld: 


.M 2000 
„M 2000 35000 


TIP: zie de D-tip. Gebruik dit commando om bijvoorbeeld teksten te kunnen 
lezen of om gewoon een stuk geheugen te onderzoeken. 
P — PRINTER ACTIVEREN 


Na het geven van dit commando krijgt u alles zowel op het scherm als op de 
printer, mits er een MSX-compatible printer wordt gebruikt 


E 
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TIP: als de printer niet staat aangesloten, komt u ‘los’ met behulp van CON- 
TROL-STOP. 
Q — PRINTER DEACTIVEREN 


Printen kost papier. Als u klaar bent met het printen van het gewenste materiaal, 
schakelt u de simultane printerwerking met dit commando weer uit: 


S — SAVEN 
U bewaart een file in het afwijkende HERB YMON-formaat op cassette: 
S [file-naam] [startadres] [eindadres] 


Bijvoorbeeld: 
„Ss TEST 1000 2000 
TIP: als u zich heeft vergist, drukt u op CONTROL-STOP. Als u een file in het 


standaard MSX-formaat wilt opslaan, gaat u met behulp van het X-commando 
terug naar BASIC en gebruikt u de ‘BSAVE’-instructie. 


T — TRANSFER of VERPLAATSEN 
U kunt een stuk geheugen verplaatsen naar een nieuw adres: 


T [beginadres] [eindadres] [verplaatsadres] 
Bijvoorbeeld: 


.T AO00 CO00 DOOD 


TIP: gebruik dit commando in combinatie met de ‘LAAD OP ADRES’-mogelijk- 
heid, om uw subroutinebibliotheek te linken. 
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W — WRITE of SCHRIJF 
Een commando om teksten met de HERBYMON te kunnen plaatsen. Dit 
bespaart u erg veel tijd, omdat u anders met een ASCII-tabel en het :-commando 
moet knoeien. Het gaat zo: 


‚W [startadres] [string] 


Bijvoorbeeld: 
.W D800 maximaal 16 


TIP: kies altijd vaste gebieden voor uw teksten, aangezien de combinatie met 
machinecode anders een grote puinhoop kan worden! 
X — EXIT of VERLATEN VAN DE HERBYMON 


U gaat weer netjes terug naar BASIC. Om te laden, op te slaan, of om een 
combinatie BASIC-machinecode te testen. Gewoon: 


!— INTERNE REGISTERS 
Als de HERBYMON opstart, worden alle registers intern weggeschreven. Dit 
gebeurt ook na de terugkeer uit een subroutine. Het '-commando gebruikt u om te 


kijken hoe het ‘met ze gaat’: 


TIP: handig VOORDAT u het *-commando gebruikt. 
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# — DECIMAAL 


U krijgt het binaire en het hexadecimale broertje van een decimale waarde (van 
maximaal 5 cijfers) te zien: 


# [decimaal word] 


Bijvoorbeeld: 


„.# 01254 


$ — HEXADECIMAAL 


Display van het binaire en decimale equivalent van een hexadecimale waarde 
(lengte maximaal 4 tekens): 


‚$ [hexadecimaal word] 


Bijvoorbeeld: 


.S 12354 


% — BINAIR 


Conversie naar decimaal en hexadecimaal van een binaire waarde (lengte maxi- 
maal 16 tekens): 


% [binaire waarde] 


Bijvoorbeeld: 


„% 1010101010101010 


& - AND 
De logische AND van twee words: 
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‚& [word] [word] 


Bijvoorbeeld: 


„& 1111 FFFF 


TIP: met één byte wordt dit bijvoorbeeld: .& 0011 OOFF 


*_ AANPASSEN VAN DE INTERNE REGISTERS 

U verandert de interne registers (eerst het !-commando geven): 
‚* [SP] [TY] [EX] [HL] [DE] [BC] [A] 

Bijvoorbeeld: 


.* 0000 1111 2222 335335 4444 5555 66 


TIP: een prima mogelijkheid om een subroutine te controleren of om een sprong 
goed te laten starten. 

+ -SOM 

U krijgt de som van twee hexadecimale waarden: 

+ [word] [word] 


Bijvoorbeeld: 


„+ 1010 2020 


—— VERSCHIL 
U krijgt het verschil van twee hexadecimale waarden: 


— [word] [word] 
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Bijvoorbeeld: 


.— 2020 1010 


@-—-OR 
De logische OR van twee words: 
@ [word] [word] 


Bijvoorbeeld: 


„@ FFFF OFOF 


| - XOR 
De logische XOR van twee words: 
‚/ [word] [word] 


Bijvoorbeeld: 


„/ FFFF OFOF 


TIP: de XOR-instructie is een krachtig maar zeer ondoorzichtig wapen. Wat 
experimenteren is dan ook vereist. 
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Appendix A 


De Z80-instructieset 


De instructies staan in alfabetische volgorde en hebben de in HERBYMON 


gebruikte syntax 


[cs JARERONIG 


He Mn Ee 

Lm 
Ll 
"er 


In 
| 


hek tet Kd Ki bed Eid 
el * 
zE Fr Kl KT te 


vain 


KOR OET OO OKT OK OET OKT AT 


Er Me Kn Wer Ko Ke He Te To 
fd Bi bt bd Kn ki 
Pae) 
FT [enn 
ndr TT 
LE ZE Ki ei 


e= 
Ket Kd 


Ea CA EI Ca 4 
al 5 


IE CE 2E FE Ie Ee De Ku Ter Er 


er 

Eid 

Me SS 
he amel 


RDE AH 


ADD AL 


B, CHLÒ 
A, £14+koo) 
A, (IY+&oo) 


nn an ON a 


CN re KO DO GO PO CO CO TE Et EM 
FTI Gd KA bd Ee EO SE Ke Ket FTI 


ED 
ED 
El 


ED 7} 


CE CI 
me rr 
DO 
Or 


5 
Er 


ZU OI ZE 


zu ZO ZU ZO Oa OZ OZ OZ Ot OG 
zu EU O0 2 ZO OZ U 


= _ - 


Ee OK ZE OO 
Ll 


w 
__ 


HO OZ OE OT ZE 


zE 
EE 


RR 


es 
zi 


RR 


ZU OZ 


== 


CO OZ ZE 


0 


seh 


„Kl 
obu 


_ 


ze a 0 zi 
zn 


Lb 
zr A ZE 


Kl ZE 
#, 1 


=D ZE 


sl OEE ZO 


== 


r 


zt 


OE 


LK} 
zt OE OZ OK OEE EN 


rl 
ZE ZI 


ns, 
_ 


zE ZE 


=K 
=T 


ZE ED 


=El 


ee En 6 


zt 


zu Cl 


mp Ov On nt 


pk: vh: se Oo Os nt Ok ab: se vh Ov apa bt 


sb oht 


zb. 


en a Ht ot sk 


ein Bu Bn Ha een eek eek eek eb he gak OT EN Kit 


„Ln 


Ln feat 


bee pent eat ek ek fak et 


Jie in OJ oe in oe oek "mj 


Bk eet eek mn eu „Jan 
EN OT EA In 


Eek 


mm} 


eat 


vl mt 


Eh Wan fa fe Eh 


ln mr 


CN 
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ADD A,$bb 
ADD HL, 8C 
ADD HL,DE 
ADD KL, HL 
ALD HL,SP 
RDD I,EC 
RDD IX,DE 
ADD IE, IH 
RDD 14 5P 
ADD IY,EC 

D 1Y,DE 
ADD 14, TY 
ADD IY,SP 


Tr En XE 
ns Ed 5 


ÊND (HL) 


AND (IZ+400) 
AND (IY+&oo) 


AND A 
AND B 
AND C 
ÁND D 
AND E 
ARD H 
ARD L 
AND $bb 


BIT 0, (HL) 
BIT ú, IX+&oo) 
BIT 0, (1Y+kao) 


BIT 0,A 
BIT 0,8 
BIT 6,C 
BIT O,D 
BIT dE 
BIT 0,H 
BIT Ò,L 


Bit 1, (HL) 
BIT 1, (IX+&oo} 
Bit t,{IY+&ca) 


Bil l,â 
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C& bb 
05 
19 
25 
38 
DÛ 
It 
DÛ 
Dj 
di 
FD 
FD 
Fi 


+ 
Pel pan SEE 
CN EN EJ 


4 


d 


Eel Pat men We Eed 


NO OA EJ 


DD 
FD hé o 
fi} 
ü 

Í 


A} 
ni 


A3 
RA 


EÁ bb 


ER 46 


Db CÉ oo âó 
FD CE oo 46 


Cä 4} 
CB 3Ü 
CB 4i 
CB 42 
EK 
CB 4d 
B 45 


Ir 
Li 
bt 
To 


zh ZE 
ZI 


zu 5D 20 TM ZO 
zn 2 ZEI 


il ZE OE 
ZK ZE ZO OEE 


I 1 
=D ZO 


t 
zo 2 =tt 


I 
zl 0 z 


=l 
-R 


KO -R 
ee SR 
„RR =-R 

RO -R 

RO -R 

RÔ-R 

Kû-R 

RÓ -R 

RÔ- KR 

RÔ-R 

RO -R 

KÓ-R 

ORG 

iÔRO 

iÓRD 
1ûRÛ 

Lökû 

lÓRÛ 

ORO 

LoRG 

RD 

TRG 

iûkd 

Le 

[se 

Le 

Les 

pj 

bje= 

Des 

bk 

Eee 

Les 

pgr 

Eee 

rijese 

Or 


vpt ok a Oe ps rt shi 


su EM ok sk ks Pt na Or nk vs On Os On >kt sn vh a Of ap hl 


ze na OS ns OM Oa vt 


TE 


en Bn in iu on Ain Ben Bn Ld Kerl Kal Hed Pd 


Ln en hal 


Fl en eee jen Pe enn re penn 


hl Pa Pal Kal ha Pal Pl rn EN Lel 


hi CA LO Cd 


il 

$ 
Ïi 
ii 
Ï 
13 


Pam 


ee 
a 


5) 
15 


_- 


Lo 


GE 


JI 


mel Een on Fn on re an fn oek jaak hf 


met bal 


CU pa Pl at 
in an 


CE CO ED CE 


Pl 


EO Pral Fad It 
Ce 5 


BIT 1,8 CH 48 sKelekes + À 8 
BER IG CB 44 sk * 2 8 
BĲ 1,D CB 3A ate drf sns + À 8 
BĲ sE CB AP ek he Ì À 8 
BIT LH CH 4C wet Lee + À 8 
BĲ IL C3 4D ai i ? 8 
BIT 2, (HL) Ch Bé SH É 5 12 
BIT 2, (li+ko0) Bh ge de OR lds É 5 Zú 
Bil 2,{iY+koo} FD CB oo 36 —Riû-= Î a} 20 
BIT 2,8 CB 37 es ee É À 8 
Bi 2} CE 50 sl des + è 8 
BIT /,C CE af stie £ È À B 
BIT 2,D CB 52 stes + À 8 
BIT 2E CB De see $ À ö 
BET Zon CE Gi Ld : È ë 
BIT Zok EB 5u sit 1 ? 8 
BIT 5, (HL) Ch 5E Redge 1 3 1ä 
BIT 3, (iXtkoo) DE CH oo dE —KktD == È 5 2Û 
BĲ 3, (IY+&oo) FD CBE Rilies $ 5 2 
BIT 5,Â CB SF ma es É è 8 
IT 3,8 CE 58 ek kies } À 8 
BEE 50 CB 59 Re E d 8 
Hit 5,D CB JÂ scheper 1 2 8 
BIT 5,E C3 5E Re È ? B 
BIT 5,H CB 3C > Reken e É ? 8 
BT aL CB 5D RL De É À 8 
DIT 4, {HL} CH 5ö SR 4 5 12 
BIT 4, (iXt&oo} Db CB oo bé —-RLD-- È 5 2Û 
BIT 4, (IY+kao} FD CE 0054 Rl ï 3 20 
BIT 4,Â Cl 67 sk Des È 2 B 
Bit 4,5 CE bi ee Ì ? d 
BIT 4,6 C5 Al ee ï À 8 
BIT 4,D CE 6 Lee $ ï 8 
EIT 4,E CH 65 skis È Ì ö 
BIT â,H CE 6d mtd t À ü 
BIT AL CB 55 sier É d B 
Bit 3, {KL} CH 4E Sd qe > + 5 12 
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BIT 5, (IX+koo) 
BIT 5, {IY+&oo) 
BIT 5,A 
BIT 5,8 
BIT 5,C 
BIT 5,0 
BIT 5,E 
BIT 5,H 
BIT 5,L 


BIT 6, 
BIT b,{ 
BIT 4, 
BIT 4, 
BIT 6,8 
BIT 4,C 
BIT 6,5 
NN: 
BIT b,H 
BIT bl 


Bit 7 
BĲ 7 
BIT 7 
Bit 7 
BIT 7 
BIT 7, 
BIT 7,D 
BIT 7E 
BIT JH 
BIT 7,L 


CALL $hhil 
CAtL C,$hhlt 
CALL H‚ Ehh] 
CALL NC, $hhL! 
CALL NZ, Shall 
CALL P,$hh 
CALL PE, $hal1 
CALL PO, $hhil 
CALL 2,ShhL 
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Dö El oo 4E 
FB CB oo bE 


CH 
C8 
CB 
CB 
CE 
CB 
CE 


Ch PTT Kl CI 
Eet Et cet Et Ei EE ED 


tal ma me ef ad mf a ET OD 


EE CT 


En KJ 


Kr CT 
EE Krt Er 


Dj) 
DC 
FC 
D4 
Cé 
Fá 
EC 
EÀ 


Ce 


öf 
Ga 
55 
bh 
óÛ 
EL 


ËD 


j 78 


CE 


Pr 
LB 


rm 


KE Ee MO CO CTI Ezs EK 


ii 
ï 
ÏÌ 


Ì 
ï 


1 
} 
Li 
}i 
1 


oo Zé 
oo /é 


hh 
hh 


hh 
hh 
hh 
hh 
hh 
hh 
hh 


Í 
mt 
t 
' 


L 
zl OK OZ ZN ZJ U 
Ken Ce Ce OT Oh 

j 

t 


1 
zi OZ 
en ge eek pee Bee pe ee pe ee 
OC 
ri 
. 


( 
Î 


tt d 
zu ZO MO 


| 
„El ZZ 


| I 
A ZE mee 
Bm pet me par hen Deed perte pm hin jemen 


Ger GZä tar 
Ü ! 
| ( 


E 
„U A OE 


Î 
„0 Ii ZO 0 0 
Dee ek ek pe pe pee eek gen ee gn 
pn 
Î 
ï 


t 
El 


ennn nn 


en nn 


Ne 


nnn nnn 


nnn en 


Er OT Or OE OK OG Oe OG 
Ï 
t 


Ge 
I 
l 


2 nk rk ns Mo > ok sk nfi an np ok Oe a Oo ae Ov na sa ne ot a Oo Oa OM On sh 


mp Or Oan 2 nr Oe au en nt 


PA ha ba Pa Fl Bat Bt LA LJ 


Pl Par Pa Pal Frl Pd fel GN EN Cd Bat at bal Pat Fa Fa Hal IT CM CA 


cr CT CA EAN en EN CN EN EN 


(5 
(5 
(5 
(5 
(5) 
(3) 
(5) 


te) 


ar ee, 


cn EO B CO CO CU TI PI Fa 


j (10) 


(10j 
(1Öô 
10} 
(18) 
{10} 
Ci} 
(10) 


CCr 


CP SHL} 

CP (Tät&doo) 
CP (17+toa) 
CP Á 

CP 5 

ERE 

CP D 

CPE 

CF H 

EP L 

CP $bb 


CPIK 


CFL 


Dhâ 


BEC (Hi) 

DEL (1+4oo) 
DEL (IY+&oo) 
DEC À 

DEC B 

DEC BE 

DEL £ 

DEC D 

DEE DE 

DEC E 

DEE H 

DEC HL 

DEC IX 

DEL IY 

DEC L 


Et eel med 
Ezi prij ni 


Ei TTI 

mn Ed 
tet Eri 
ri rr 


mj KI Kr El en EE Er 
ri 5 Ca 3 He Oo CI 


EN Cn 


B 
ÓD 


E 
al 


iB 
id 


9 
ë 


ZB 
DD 2B 
FD 28 
2 


dû 


EDR 


ee | 
u 


0 FO 0 ZO ZE 

ZE OEE ZO OA ZE 2E ZES A OZ ZI 2 
ZU OE OZ OO OZ 0 OZ 2 ZU HOE 

ee ee ek een ee eb gen en pe ee ja 
zu ZN Zp EO 2 ZO ZU OE ZI OE 

=O A 2 2 ZE DO ZU OA ZI ZO 


zo A ZE ZU Ot OE 
IJ 


tf} 

zE: 

Zlk 

De 
Î 


ee nnn nnn 


an On a de pn Oe a en One OD a 


si Ok oke ok ot om 


vn nf OP On ne ne DH u =H 


Bee 


Pt bee pn ee je ee ek oen EI ON Hd 


ree 


je 
El El 


ml an Be Fn Pin Fo Fn u Mak oek Sf 


Eek 
Cr 


té (21 


18 {21 


Fn 


in 


ed Kaede 


on an On Je De De Bn ee DI en 


Je et be EF 
zm 
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DEE SP 


6 
bed 


DIN. Errrr 


ri EO U CM 


KN OON Oman en ten 
FT 


Ied 
zn 
Fl 


eg 
mes" 


Lams 

Er 

Jen JE 

mn mn 

nt een 

rn 

En 

hanen 


en 
Et KO KE 
mn ran 
3 CT CT U ETI O&er LT 
. r mg an 


IK 


ant! mr 


[NC (HL) 

INC (iX+kaa) 
INC (1Y+&oo) 
KL À 

INC È 

IRC BL 

ING C 
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Fi 


Tr 
ä 


(8 
Ü5 


ÓL 


ri 


rr 


de} Ged 


rr 


& 
D 54 on 


já oo 


nnn 


en nn nn 


nn nn 


pe | 

= 

0 

cn 

=£J 
) 


zu a U mW zo 
ZU AU 2 20 st zo 
zes zn SO 
sz „CE : 
= zin 
' I 


ARROR- 
RRROAR- 
RRRDR- 
RRRÔR- 
RRRÚR- 


ad) wl ae Os On On ne 


at sk nk oe nt EN se St ak 


st nh: zi bd at 


tell 


zepen 


Led 


pet 


en een Er Ce OC 


hi 


Cel Oet Cel ted F 


Ked Bel del Cel Éed 


ben en pen eeen Ee Cree Éed 


ml 
nF) 


Koerd fed 


Fn Pal Pl 


far 


TE 


EE 


heek 


Oe enh je ede eh oe ek ee 
ba Pa Md Pr Pl Pal Hd een Ft 


Cel Le oem 


Ea KF den Da OP Fl beek 


INC D 
INC DE 
INE E 
INL H 
INC HL 
INE Ik 
INC IJ 
ING L 
INC SP 


IND 
INDR 
EL 
INEK 


JF (HL) 
JP UD 

JP U 

JP ShhH 

JP C,$hhli 

IP H‚Shhil 

JP NC,$hhil 
JP NZ, $nhlt 
JP F‚$nhil 

IP PE, $hhii 
JP PE, $hhil 
JP 2,$hall 


JR Errrr 

Jk C,êrrrr 

JR NC, @rrrr 
JR NZ,Brrrr 
JR Lërrrr 


LB (BC), 
LD (DE) ,À 
LD (HL),A 
LD (HL) B 


ED 


EB 


E} 
DÛ 
FD 


mr 
% 


Dé 
FA 


7 
& 


Ee 
ee 
ER 


7} 
& 


ma 


L& 


18 
38 
3 
20 


25 


Ö2 


Ti 


19 


2 


B2 


el pe FT] FT? 
hs | 


nn ee. * 


bed 
I= 


lÌ 
1 
1Ì 
1 
1ì 


Fr 


Tr 


Er 


hh 
hr 
hù 
hh 
hh 
hh 
hh 
hh 
hh 


RRROK- 


nen On 


nn en 
en 
nnn 
we nn ee nn er 
_ nn nn 
mn nn en a 
En 
en 
_ ne ne 
ne ne an an 


nn nnn 


nnn Oe 
_ nnn an 
ene 
nnn ge 


oe Ov npt Fe On Or nt hk shr 


br 


apr eaf kn en ehs re nt a Op On ne nr Os nr opt 


on th 


wbt 


mn 


Ged Lel ded Med ded Lod vnl ded Cel B Pe 


ded Ged 


Led biet d É. ed 


El het Pd Kd 


Ge 


ne hannie 
s 


mirte 
De 


Î& 


16 


Î8 


1Ö 
1ö 
1ö 
1 


10 


(21) 


(21) 


(7 
(7: 


(7 


2 
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LD 
LD 
LD 
LÈ 
LD 
Lò 
LD 
LD 
LD 
Li 
LD 
LD 
LD 
LD 
LE 
LD 
LD 
LD 
Lj 
LD 
LD 
LD 
LD 
LD 
LD 
Lb 
LD 
LD 
LD 


(HL) ,C 
(HLD 
(HL) E 
HL) „H 
(HL) ,L 
(HL), bb 
(Il+koo) „À 
(i{tkoo),d 
(1Xtkao) ‚C 
(Tí+koo) ‚5 
(IX+taa) ,E 
(Tät&oo),H 
(Iätkaal L 


UI{+too),$bb 


(iY+&oo),À 
(ÌY+ino),B 
(IY+&cal ,C 
(ÌY+Eoo),D 
(IY+koo) ,E 
(1Y+&no) ‚KH 
(I4+bao) ‚L 


(iYtkao) „$bb 


(ShhLLj,A 
ShhL1),BC 
($hhìi) „DE 
(SHALL) „KL 
(EARLI IN 
(ShhLL} IF 
(ShhLL SP 


LD A, {B5} 

LD A, (DE) 

LD A, (Hij 

LD A, (EX+fao} 
LE Â, ([Y+&oo) 
LD A, ($hR1L) 
LD A,A 


mn) nl mf 
u Ket Pl ee 


ad 


“rj Cri PM EI EA EE El KEA B Kd ETA Cal mf 


zt fel Eed EZ Pt KJ Bet Beh Eed ES ed B Kd Kl rd Kl kod BE kee KO El Ee CI 


Ez pa pri PT eef TER ern PE Tr TFt 


af en 6 PT OM 
TT Ee We td Ed 


aa, 
EA bd 


3 
7 
78 
EE 
TÄ 
ZB 


et 


ÏL 


bb 
Hi 
7 
Ài 
7l 
Jä 
Só 
Ee 
7 
72 
75 
7ä 
75 


56 


Â5 


7E 
id 


Go 


06 
0ú 


lì 


oa 
00 
hk 


bb 


hù 


ì hh 


hh 
hh 


nnee 


ed 


nan an! 


nnn 


en 


ennn 


nnn nnn 


nn ne ne ne 


_ ee ne nn 


nne nn nr 


nn nn nn 


A 


A 


an ok nt ON npt rh abt 


en ee et ee ee ee a CN EN B al al Dre Cr Cr CN Cr Oe mn EA CA EN u A en CN CA CH En LN CT OCM Ort ENT CN Gd Pt ba Pa Pd FJ 


eee ee ee ee ek ef Se Se a “end 


me} Pad Fat 
Late} 


Bel AI mk 


an En fen En Orr fn on en ek Of el 


LD Al 
LD A‚L 


LD A,$bb 


LD A,R 


LD B, (HL) 
LD B, ([{+koa) 
LD B, (IY+koo} 


LD BA 
LD B,E 
LD B,C 
LD 8,0 
LD BE 
LD B, 
LD B‚L 


LD B,$ob 

LD BC, snhil) 
LD BL, $hhll 
LD E, (Hi) 

LD 6, lIX+kao 


LD C, ([Y+&aa) 


LD C,A 
LD C,B 
EEE 
LD CD 
LD C,E 
LD C,H 
LD CL 


LD E‚455 
LD D, (HL) 
LD b,{iZ+kao} 
LD D, (1Y+kooi 


LD D,A 
LD D,E 
LD D,C 
LD DD 
LD D,E 
LD DH 
LD DL 


LD D,$bb 
LD DE, ($hhLI) 
LD DE, ShhLl 


4Û 
dÌ 
â2 
85 
43 
45 
é 
ED 
Öl 
dE 


mm 


FD 


àà oa 
86 00 


bb 
ië il 
Ìì hh 


nnn 


nn nne 


rn 


enn 


een 


hd a en! 


enn nn 


nn nn ne 


nnn nn 


a 


mj sh 


zkt 


A 


op kt a tt nt Mt 


ep nf Os nde Oe a Oh Oo On Oo Ol ME 


eht 


“MN af OM sb ppt 


Cd re Pal ee ek gen ee ge ek pee EN CA B OP ee Ee nt ek ee nk et UN OE OP Ed Ore en en ee ee ee en eek EN LN PI hi kl ee Hd 


dh ml 


nf ee en Pe Pe Fan En OB ek bh mf on a} Pm ol 


ed 


mal bet Pa 


„En oee oer 
0 


En En Be nn on 


EL 


=> 


Pd 


beet Fat "nf fe oen Pen OJ Oe Oe of enk oek ol al 
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LD E‚ (HL} 

LD E,‚(IÌ+4oo) 
LD E,(IY+koo} 
Lb E‚Â 

LD E,B 

LD E‚C 

LD E‚D 

LD EE 

LD E‚H 

LD E‚L 

LD E‚fbb 

LD H‚ (HL) 

LD H‚(IÄ+koo} 
LD H, (IY+Eoo) 
LD H,A 

Lù K,B 

LD H‚E 

LD H‚D 

LD HE 

LD H‚H 

LD H‚L 

LD H‚$bb 

LD HL, ($hhil) 
LD HL, fhhll 
LD T,A 

LD 14, ($hhii) 
LD 1%, 3hhlt 
LD JY, Snallò 
LD 1Y,$hhll 
LD L, (HL) 

LD L, (IX+&oo) 
LD L, (IY+&ao} 
LD L‚Â 

LD L,B 

Eb EC 

LD L‚D 

ED LE 

LD LK 
EDEL 

LD L,bb 

LD R‚A 
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Ln Cr er ES en 
Cea PI ke 63 FTI 


EN Oe en CT OE CH EN KH 
EE Oe OPT SA O3 Et He LO 


Pt De Ce Dre Lr= CF= [re PT 
Cf CN En Ged PI pen OE mt EE EZ 


Zi 


Dö 


an EN 

rm Fr] 
6. 
Ci 


bb 
ÌÌ Ah 


t li hh 


A7 

2Â ÌÌ bh 
21 11 hh 
ih 11 hh 
21 11 hh 


ee nnn ee 


nnn 


nn zn 


nn en nn a 


ene nn mn 


nnn 


nnn nn 


nnn ne 


_ nnn nn ek 


nnn nn ne 


apt 


apt nbs opt fs he! 


pt nd Ov On sa br 


zb: 


oe ee ot de et sn OM ne 


ot sm Ook ze na Or ne Oe Oe a OPM nk PH ns PH ak OP nbr 


Pt HI en ve en et ee en ek CN CT HI En Oe dm Ope Mt Cl Ore Pen ee en ee en ek en EN CMT KI A en et en en pen er et IT EN Pd 


bet bee em 
 = 


Orle ENNE khen Ee BE PM 
_fI 


ae 
Ke? grt" 


Zû 


Jee fe nf oee Pr ee 
EN Er Mn fz 


0 Od en En fen fn Pa Fm Fn 


LD SP, ($hhil 
LD SP, $hhil 


LD SP HL 
LD SP, 1 
LD SP, IY 


OR (HL 


DR HEX+&oo) 
OR {It+&ao} 


OR A 
Ok 
OR 
OR Ò 
Ok € 
OR H 
OR L 


tr 


Ln 


OK $55 


OTDR 


ÜTIR 


OT 
OUT 
DUT 
GUT 
GUT 
GUT 
GUT 


(CA 
(C} B 
(a 
(CB 
(Ch, 
KELK 
(CL 


en Ei Et 


s Ei rr CO 
men Ke ml Ezi EA Cr 


+ 
alu ú- 4 Frl 


Cn 


mi rm mem rm rr FT 
mh BE md EEE Ked Eid zi Kz Lr- 


mr 
En 


ED 


Ik ìÌ nh 


1 


F? 


RB 


Ect Do 


Gre Cr 


17 
di 
48 
3Î 
37 
bi 
6? 


hh 


Oo 
qe 


nn a en! 


en 


zkt ZE ZJ 
== 
Ze ZD 
et 
En 

mad 


zl 
en | 
KEN 
hen | 
CT 


zt 
z 
nn 
din 
=L 
En Kn TD 


nnn Oe 


"en sk Om Ot a 


np: On a zh shi 


ak Oo ze mbt 


npt Ph: 


sm afs ok nn nb a mke 


ij Pa bal om Lel EF 


Hd 


eerde 


FI Oe en eee pe ek et ek IT EN Hd 


me 


7] 


Bel Def Kel Ged Led Eed Cr 


(à) 


(4) 


20 
10 


18 
1 


ig 


al Fn En On Fn in fn Of eek te “ed 
EE 
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Lt 


bemerk 
Lr 


Kare Peek beeb Peek eek [eeeh Gene 
ba Pal bl Pat Fel PJ be 


(ia) 


{ib} 


5 €21) 


p (21) 
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OUT ($bb} ‚A 
OUTE 
OUT 


POP Af 
POF BL 
POP DE 
POP KL 
POF 
POP dt 


PUSH AF 
PUSH BC 
PUSH DE 
PUSH HL 
PUSH IA 
PUSH iY 


RES Ò, (HL: 

RES Ò, (1X+&00) 
RES 0, (1Y+&o0) 
ES OA 

RES 0,8 

RES 0, 

RES €, 

RES Ò 
RES 0, 

RES O,L 


5 
heli 


nn nn nd 


Èrn Cf Er Cra Era F3 urfn CAJ 
ab 


mri Fr ET FTI EM Ft Sm eri mt FT} 
Pr$ CA CP DL Mn omen en 


Er Eri 


= ZD 2 EU ZE ZU OZ ZE 
gea eek jee opaan jen Peet oere oja one mee 


me al zijns 
Ee bat caf 


p= 
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C 
Cl 
Dl 
El 

DE Ei 


FD El 


Fa 
C5 
D5 
ES 
Do £5 
FD £5 


CB Bé 
DD CH 
FD CE 
CE 87 
CB 80 
CB 3Ì 
CB 82 
CB 83 
CB Bá 
LB 85 


En 6 EI OC) OC OC PE OP OE OE 
ko Et bt ED Et EEL Cet ETd kt Cr} 
ra ra CO MO CA Cn CL 
dee mf CO TI OA Er FT 


Cu CO 10 
TI CN KT 


no Hé 
vo dé 


nn an 


nnn nne 


nn nn 


_ nnn 


np nn nge nn 


nnn 


vh: sj sh ot Oe On Mt 


sn of va nt Oe ah ph abt 


ae ft np se nd Oo opt 


ap On Oh: Oo Oz OON abe OD One vr 


„u 


effen 


En in Col ded Let Eerd 


En Ee frl Ged Ged Cel 


ma fl Pl Pr Pas Peat Pa Or Cr he 


Í 
iû 
iú 
1û 
jä 


a 
ke 
dT 


Cp CO CO EE CO OO MO 


Lek Ked CM 


Er EO CO Mh OU OO CU Pred met 


5 


CE 5 


Ze, {HL} 


zm 
ke. 
u 


RE 


Open ph LO pen Pen ur pra pes LO Pen pel 
ES El EO OO OI O5 OP OA MI a Ed 4 OI ON CO O5 OI KA DI nt ES Ed DI OI OI LI DA DO OI ed Ed KM OT OA OI OR CEI 
ID SE El Ef EN FE Ed Od Er mt On EE OE OK OE EL OE EI anr OA OI EO Ed ET OO Ed Cd EL mt OA A El OE Ed OC Ed 
ue nde Me ne ME se ne ne un oe OI Oe fe Oe Oe oe ze a bie Mt re Oe Oe On re OI Ore ris se ue nk OM Ok ne ok nk 
t | ! t t ! | 1 t I Î t 1 Il Ü I i 1 Ü I | l É 1 Ô I \ ì l [ 1 | 1 1 Ü 1 Î 
! i 1 : 4 I : 1 ' i ' Î ! i i $ 1 l t í Í Î ij ! 1 î $ \ I Î ! t ' 1 í i 
Î Î ! Ï t I Il 1 1 | 1 Î Î ! I Î Ï Î ï Ì 1 Î I Î I ! } Î Î 1 t ! I 1 Î l I 
i í t : i t ! ' ! 1 : t 1 Î j : ' 4 I 1 1 ! 1 Î I L t t t 1 1 i Í 4 : I 
î i 1 I l Î Î I 1 | Ï Î Î ü Il } t Ï j â 4 1 I } Ü ' Ï Î 1 Il ! t L t ! } ! 
i I } 1 Il : [ I ! t 1 1 E 1 Ii í i f \ I 1 Î Î } ij I 1 I Í : 1 : t 1 t t ( 
JN AI Lut bal A bal Lat 
DG rn «LE <IT 6 sE 
TD 2 DD 
a ch DO 3 a € 
On sn oen OS ot ef F9 eze LEI Lal ETS OO Lee MA CH eh OE Od A OE OI Een OE en ed Fe ee AT Lal FE A be U EF OE OM 
En Ct KE OC OET Oe Er Ee nn Ea OE On On A Oe OE En ET dr CJ CJ KE EE AE OKE ME a EC zE Ea LI EE OE EL SE A 
FA fa FO FO FL A OF CM OFI MI FA arn AMA MI Ci OF FE FA EAA OM OET FIA TA A ra Aar FE 
KN Le KI KA OEI CI El CF LI La FR Ie CA BI KA Lr Ed CI É LI CA Lr, CI LI OI CA LA EI CI LJ ER ka ll a Ed CI EJ 
se, Pte en Plans ON an. etn gee 
OD OO OO OO LJ OD 
CA DD Gj A MO Es 
sell get ebi eel met veld wek a 
de en ee mn mn ee 
Nek Oee ma OH Oe ad A Ze wel OT Zee 
emd ed EE tet et IE bt A To tet 
Tet ner Ja LI FA Ut ZE dl Tet nr et UE ED OC ER La HI —á hee et nn EE OF Ea ke Lil ES ul et en er EE OD LI EI AAS 
_— mad hand Lam Kind en _ Lan nn mad m _ _-_ amel _ land amd _- _ land mm rr __ _ __ mr _ land med ml Lm kad land mm nn en an 
Kn OD OE OE OT OE el Ed pp Pe Perg OPO OP OP Pe Pep PI hi Ee Ee en en ne ne. ne a ae ra UI LUI UI LTA UI LCA LCI 
ENA FAA CTP CM EIT EN KI EN BSD KN} ETI OENE CNN EN CD EN LTA CUI LA CM KN CAI EM ENS EN KF CO KPJ CFA CFI CFI ON CIA KA OE EN 
Lid Lat Dol Lal La Lat Load Lal bal Cat Lel Hat La} Lat Kad Lal bat bad Lud Kid bal Lat Kad had Bal Ladd Lud tad Lud Lat Lud Led tad Lal Lal tad Lal 
OT OE OE 5 PE OE EEE OEF O5 IE 05 OE 5 EE OE OT EE KE O5 Em O5 UE CE OKE OS DE DE O5 Ch rn ME CE OE O5 OE ME ME 
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5.H 
5.L 


6, (KL? 
b, (IX+kao) 


20 20 2 MJ FO ZU 2 
mm rm mmm mm pm fm 
Kra CON EF EFI EFA EFS CA CMG EFJ Uh 


a} 
mln 
aa FS 
han had 


al 


tina} 
+400} 


nd ml kf 
El _ A 5 Eems 
arke. aan. 
ss 


nd 


RE 


hed 


med Sef mf af mm 
UT OSE FM OT OCT EE Ne en en en 


a 


nd 
zE ZE 2 OC 
Pal CT 


=d A 
0 “U 
EE FEI 


dj 
ml 


RL {HL} 
RL (1Z+Eoo) 
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EB &C 
CR AD 
IN: 
DÈ 00 
FD CB co 
LB B7 
LH Be 
CR Bi 
CB dd 
CH B3 
CB Bä 
CB ES 


Cr. 


3 es CO 
Er 


J 


Ci 
Tr 


rt 


Üo 


Er 
Ter Eri Kat Cod Et Ext 


Arm PT CJ En PM OK OC ET CD OE OET OE CT 
En CE ETh OKER Ee CEL Ch A} eet Eri krt Kd 
EES EO rd Eel ent CU rt EP CT 
RT CT krt En =d Ch TTT EE Ke FT 


El 
Eu 


nnn nn 


ee nn nn nn 


_ nn 


nnn nn 


nnn nn 


nnn 


ene 


ok: 


ain sh ns of ne nt Pk de 


vir 


me Oo Ons Oe aki 


ns nd On 


sk On On ne Ort Op OO ps 


ra HJ 


Pa Pal Fr PJ br PA Pet EP Ore En ha Prak Peat Pl Pd bal Pa Cres Er- „Ee 


Kel Lel Urd Bed Ged Erd Ged fat Ged 


1) 
Ci} 
(ij 
(i) 
(ij 
ti) 


Ked Ged ON 


Co Ch CA EO EO MO EU PJ Fa et 


Del sed EN 


ca CO MO FC MU CO EU Pl Pal Iet 


RL (iYtkaol FD CB oo ié RROORK + 6 23 
RL Â CE 17 KROOÓRR É À ö 
RL B CB iú RROORR } ë ú 
RL C CE 1Ì RRODRR E 2 ö 
RL D CH 12 RRGORR + À 8 
KL E CE 13 RROORR É À ü 
RL # CB 14 KRÓORR ï 2 8 
RL L LB 15 KRGORR $ ? 8 
KLA IN, seek + Ì $ 
RLC (HL} CB Ù6 RROORR È á 13 
RLC (IX+4o0) DD CB oo 06 RAOGRR È b 5 
KLE (IY+&oo) FD CB oo 06 RROÒGRR È b 23 
RLC À GE 07 RROORR i 2 8 
RLE B B ÛÛ RROORR È 2 8 
RLC C CB Oi KROOER t è 8 
RLC D EB Ü2 RROORKR É 2 B 
RLC E CB 05 RRÔORR Y 2 d 
KLE H CB Ód KEROOKRR É d ö 
RLC L CE 03 RRECORR É d 6 
RLCÂ À =S É Ì 
RLD El áF RRÔORR 1 3 18 
RR {HL) CB 1E RROORK Ë ä 15 
RR (IX+Zaoi DE CB oo le RRÜORE i ö 23 
RR (IY+&00) FD EB oo iE RAROORKR É b 23 
RR A CB if RROORR Î ? B 
RR B CB 18 KROÒRR Ë è 5 
RK C CB 17 RROORR È ? B 
RR D CB Ih KROORK t 2 8 
RE E LB 15 RROOAR 2 8 
RR H CB {EC RROORR E À 8 
KR L CB iD RROORR È ? 8 
RER Ir ee ea É Ì 8 
RRL {HL} Ch OE KRCGORR 1 â 15 
RRC (1À+koo} DD CH oo dE RROORK Ë & 25 
RRC (1Y+koa} FB CB oo 0E RRÔORR $ á 23 
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Il 
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TI 
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zn 
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uri ESD Se LCI 
es 
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T 58 
SEC Â, (HL) 
SEL A, tiÁt&oo} 
SBC Â, (1Y+koo) 
SEC Â,A 
SEL Â,B 
SEL A,L 
SEL à,E 
CEC Â,E 
SEL AH 
SEL AL 
SEL Â,#b5 


GEC Hi, BC 
SBC Hi ,DE 
GEE Hi, HL 
GEC HL, SP 


abr 


GET Ò, (HL) 
BET d, (1X+koo) 
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En CG CA En CA ET ETI 
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LJ 
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Dn 
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GET 1, HL) 
SET 1, { 


A Fen 
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EB GF 
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SET 2, (IX+koo) 
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GET 4,4 


HL} 


GET 4, (IXt&oo) 
SET 4, {ITtkoa} 


BET 4,A 
GET 4,8 
GET 4,C 
GET 4,D 
GET 4,E 
GET 4,H 
GET 4‚t 


cra en 
Per Pri FTI 
md md 


CB 
DÛ 
FD 
CB 
CE 


ER CT FA 
rt Emi bei El 


ne, 
EEN 


ba ee CD OET CR TTI B OE 
+ Est ed Ti Ed Ect El EE Et 


Kr CI 
EN Krt 


CR 
CB 
CB 
CH 


CB 
DÛ 
FD 
CB 
CB 
CH 
CH 
CB 


Eô 


CR oo Eé 


CB 
E? 
EÜ 


B Ei 


u 
E2 
E 


ES 


} EÁ 
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Fb 


) CE 
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F7 


Fl 


F2 
FS 
Fé 
F5 


FE 
CB 
Cb 
FF 
F8 
Fa 
FA 
FB 
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ES 
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nn nn nn 


nn nnn nn 


nn np nnn 
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nn nne 


ne nn nn 


eN ape On up vt nf nb oe nn 


„nnn 


eN nbs SN ze On Pap 
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PJ Kh Pd al Pad hl Fl Cr EO fa 


had Pa DI har bl Pa KP Ore CP En 


FI Pra Pt a Fl te Dd Gre Cen En 


Pal Bral Pe bt Kl Cr Dre 
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=| 
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Ket Eed AJ 
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SET JH EBFC eee 12 6 
BET 7,L EEFD Oee : 6 
SLA (HL CH 2 KROORR + 4 i5 
GLÂ (IX+koa} DCB oo 2 RROORR +  & 23 
SLA (IY+&oa) FEB oo RROORR &  à 23 
SLA A CE 27 RROORR & 2 8 
SLA B CB 20 RROORR 1 2 8 
SLâ C CB 21 RROORR + 2 E 
SLâ D EE 22 RROORR #2 fi 
SLA E CB 23 RROORR & 2 g 
SLA H CH 24 RROORR A 2 E 
SLA L CB 25 RROORR 4 3 8 
SLI (HL) Ch 36 RROGRR 2 4 E 
BLE (1X+koo} DECHoU 3e RROORR 2  & 23 
SLI (1Y+&no) FD EB aa3b RROORR 2  é 23 
SLI A [B 37 RROORR 3 2 Ë 
SLI 5 Ch 36 RROORR 7 2 3 
SLI E CB 31 RROORR 2 2 6 
SLI D CH 32 RROORR 9 2 E 
SLI E C3 33 RROORRK 2 3 6 
SLI H CH 34 RRÜORR 7 2 3 
SLI L CB 35 RROORR 2 2 8 
SRA (HL) B 2E RROORR 4 4 15 
BRE IX+&oo) DO CE oo 2E RROORR +  à 13 
GRA (Y+kaa) FD CH oo 2E RROORE +  & 73 
BRE À C5 2F RROORR & 2 5 
SRA B CH 28 RROORR + 2 9 
BRA C B 29 RROORR 4 2 5 
SRA D CE 2ô RROGRR 4 2 k 
tj: Câ 2 RROORR 2 2 6 
SRA H B 20 RROORR 4 2 B 
SRA L B 2D KROORR + 2 6 
BRL {HL} CE 3E RROORR 4 4 15 
BRL (1X+&n0) DEB oo 3E RROURR + à 23 
GRL (14400) FD CH oo3E RROORR +  é 23 
GRL A CB 3F RROORR 2 2 k 
SRL B CH 38 RROGRR 2 2 6 
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SRE C CB 55 RROORK * d ö 
SAL D CE 5â KRÓORR È ? 8 
ORL È CB SP RROORR É d d 
SKL K CE 3C KRGGRR É ? 5 
bakt CH 3D KROORKR + 2 d 
SUB (HL) 55 RRRIRK + 2 ] 
SUB (1A+&oa) DD 95 oo RRRERE À 5 13 
SUB (IY+koo} FD 98 oo RREIRKK 1 J 15 
SUE A Ti RRRIKKR * Î Ä 
SUE B Gû RERIRKR È Ì Â 
SB C GÌ RREIRK $ Í È 
GÜë D ? RRRIRKR $ Ì ï 
SUB E 93 KRRERR È Í ö 
SUE H 9ä RARIRR Ì Ì E 
SU L 95 REAIRK É Í 8 
SUB fbb Db bb RRRIKAR } À Ï 
XOR (HL? RE RERIRKR : À 7 
KOR {1X+ko0) DD âE ao RRRIRR É 5 13 
XR (IY+&oo) FD ÂE oo RKRIRKR t 5 15 
(OR â ÂF RRRIKRR } i ä 
XUR B Â8 RRRIRKK E Ì 5 
XOR C RI KRRIKR È Ì Â 
XDR D ÊÀ RRRIKR # i á 
KOR E 65 KRRIRR # Î À 
XÜR H AC RRRIRR É Ì ä 
KOR L AD RRRIRR Ì Ì ä 
\DR $bo EE bo RRRIKE # d 7 

[csiVerklaring van de vreende tekens:lral 

0 : flag wordt op nul gezet 

L : flag wordt op éân gazet 

= 4 flag wordt niet veranderd 

C : carry wordt gekopieerd 

Rs fiag wordt afhankelijk van het bewerkingsresultaat veranderd 

t ; legale Zö-instructie 

? 1 illegale Zöù-instructie (Wel gebruikt binnen de HERBYHON! 

$o6 : byte-waarde 
ton 7 index/oftset-waarde 


5 
rr : byte-waarde die een rejatieve sprongcalculatie oslevert 
$hhli 1 word-waarde ('hh' is high-byte / '1Ì' is Jon-byte} 
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Appendix B 
Karaktercodes 


Daciaaal Hex ASCli-code RESULTAAT ( ChPut') ESCAPFE-code 
6 00 NUL niets’ 
Í 0i SCH 
2 Ö2 ST 
5 05 ET 
À û4 EUT 
5 05 ENB 
b Db ACK 
7 0/ BEL doe ‘BEE 
8 Gä B5 cursor naar Ìinks 
q 09 AT volgende TAB-positie 
ij ô& LF cursor oelaad 
ÍÌ DE WT 
2 cL Fr schera schoon en cursor KUB 
Í5 GE CR cursar zover sogelijk naar links 
KE Ge 50 
15 Óf Si 
Îé ie DEE 
1 il DCi 
18 12 BCZ 
1e ij DE 
20 ië DCá 
èi 15 HAK 
di ió _SYN 
25 ij ETB 
dà 18 Ck 
25 ie ER 
25 ik SUB 
2 ië ESC naar ESCAPE-groep 
28 16. FS cursor naar rechts 
B ib 65 cursor naar links 
5Û ÎE- RS cursor Oahoog 
3i iF US cursor Oalaag 
32 2) SP spatie 
65 áj cursor oehaog 
hé 42 rursor Omlaag 


23 


57 
GB 
3 


1á 


5, 
w 


Jö 
Hi 
87 
108 
103 
L2ö 
Li 
4 
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karakter wissen 


cursar naar rechts 

cursor naar links 

wis schera en cursor HOME 
cursor KRE 

wis tot einde van scherm 
wis tot einde van regel 
voeg regel tussen 

His regel 

geef cursor-toûrdinaten 
wis scherm en cursor HORNE 
His regel 

verander Cursor 

verander cursor 


Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 
Code 















— 


35 AHZ 





EH 
39 &H27 















id 
13 &H4AH 












ul k 
123 &H7A 








143 AHBF 





141 AHED 142 &HBE 









156 AHA 


152 &H98 





12 BHAC 


ER 
ti 


181 &HB5 


169 &HAS 







T 











IB2 HBG 183 &HB7 184 &HGS 


TI EHBI 176 AHBD 


| 











190 SHBE 191 AHBF 





Code 1a5 aHga 


EEE 






EE 
nt mt 


Code 194 8HC2 145 aHCI 





E Ì tt! d : | Et 
187 &HC5 198 KHC6 198 SHCT7 200 BHCB 201 AHC9 202 &HCA 
red 


T 









209 EHD 210 4HD2 





219 &HDB 


215 &HD7 









227 AHE3 228 AHE4 





235 &HEB 


En 





Code 230 EHEG 231 &HE7 232 &HEB 








SAT BHFT 


244 &MF4 


240 BHFO Zal AHFI 











CIO Gi COT Eart HI ETI] EL Saatnn 
Code 248 &HFB 249 &HFG 250 AHFA 251 &HFB 252 KHFC 252 AHFD 254 AHFE 255 &HFF 
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Symbol 
Code 
Symbol 
Code 
Symbol 
Code 
Symbol 


Code 








65 AH4! 





42 &HSC 









94 AHSE 





Et 


9 








5__&HSF 





78 &H4E 


87 &H57 











HEE 


79 &H4F 









4 


58 AH58 





B3 &H59 
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Appendix C 


De memory-map 


De memory-map 


De memory-map onder HERBYMON, na CLEAR 200, &HOFF 







S0008 >) - _ 
OPS EALNS Syustenm 
sub ROM 

54600 op ‘ 





£8004 5; 








BASIC-proaranma 


Niet in 
gebruik 


Z8ü-stack 


SAGaa >! 
| HERBYMON 


sCHOD DH 
Voor | 
eigen | 
gebruik | 












SFI68 Do 
SF530 0 





IO-buffers 





Werkgebied 
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S6ABA + en 
DeSrating System 
sub ROM 


BASIC 


BASIC-progranna j 
Variabelen 


Niet in 
gebruik 


Z88-stack 


T0-buffers 


54008 > 












56000 > 






Werkgebied | 





Appendix D 
Kleurentabel 


Nybble-patroon 


transparant 
zwart 

groen 
lichtgroen 
donkerblauw 
lichtblauw 
donkerrood 
hemelsblauw 
rood 
lichtrood 
donkergeel 
lichtgeel 
donkergroen 
Magenta 
grijs 

wit 


8 
1 
À 
3 
4 
ei 
6 
7 
8 
9 
B 
1 
2 
5 
4 
5 


Ge je jj je 
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Appendix E 
Video-RAM=-tabel 





| Tekst (48x24)| Tekst (52x24)|High-Res_ (etriotoler 
$0306 


ee 
ereen abel | $6668 $1886 's1898 

Patroontabel | £08685 <0600 's9958 s0080 
Kleurentabel ‚n.v.t, 52006 <2008 n.v.t. 
Sprite-attributentabel n.v.t. S1B608 s1B69 £1800 
kntttecnatieontabel n.v.t. 55308 £5806 <5800 
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Appendix F 
VDP-registers 


mn ng 


Bit 4 | Bit 3 | Bit 2! Bit 1 \Bit 8 










Bit 7 


Naam 
UbP-statusregister 


'\Maode-register 
















Hummer Van de Ede’ sprite 










q Mades 














Made-register 







Mode-register e è | @ à Bits 2 





nk 


En  " 


1 
2 

‚Mode-register 3 Basis voer Kleurentabel 
4 | 


Mode-register 





Mode-register Eit T-MSE em bit & t/m E van LSE voor spritevattributen 











a | ö | Eits #-5 voor LSE=-5pr1te-0rm 


tekstkleur srreen Mode G | border=blit&ur Ctransgarant} 





Maode-register 6 

















‘Mode-register € 





== 
u 


lees gegevens 
= schrijf gegevens 


Er 
I 


Overige TÜ-adresgebieden: 
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Appendix G 
PSG-registers 


Naan Bit 7 [Bit 6 Bit 5 [Bit 4 Bit 3 [Bit 2 Bit 1 [Bit & 
‘Register B | Freguentie kanaal A - LSB 


‘Register 1 ns. Ins ns. Mias Frequentie Kamual A — HSB 


Register 2 | Freguentie kanaal EB = LSE 


Register 3 ide Frequentie kanaal E - MSE 
[Register 4 | Frequentie kanaal £ - LSB 

[Register 5 | ns. ns. [ne | Fi eZe en Frequentie Kamaal C = MSE 
Register 6 | m3. ns [ns Rurstreauertie 

|Register 7 | io-port A Ruis B | kuis R reen |rens  |roen A 
Register 8lns Ins Jas Mode # ARoirtuge Kanaal A 

Register 18 ms js [ee Hode C |Rmrlitude kanaal C _ 


Register 1Ì | ervetops-freguentie LEE 





Register 12 | Erveltops-freguentie= MEB 





Register 13 | n:a Mea. Worm van envelopes 

Register 14 | zass-inp Keyboard Trigger B Riaht-iog |Left-loy Coum=-Jou |Up- Joy 
Register 15 | Kara-lEO | Joustick Pure E Fuls 1 cn C cu 01) 
De PSG-registers 


end 
ma 
pn 
> 
(rn 
= 
«5 
rm 
Ez 
o 
ra 











B__NANNANANANNNN 





Ben en ee | en (CEN 


Ge 


Ì 
B 
IBE NT 
ALB ANA 
(ANANDIA) SZ | 


Golfvormen ALIEN A | 





Appendix H 
IO-adressen 





Gebruik 













Onschrijving 


Data 
Status 
Mode 


‚Device Adres 


RS232C \ $66 
$81 
81 


Opmerkingen 


| 
8251A 
(USART) 















698 S Strobe Centronics 





Printer 
50 | S Status 
691 [IS Data 





UDP 698 | L/S Data | THSS129NL 
599 |S Command? 
Address set 
6939 \L Status 





PSG Sag \s Address Latch AY-3-8910 
‚Shi S Data 
A2 \L Data | | 
‚PPI ‚_$A8 | L/S Data-Port A \8255A 
SAI | L/S Data-Port B 
Gah | L/S Data-Port C 
SAB S ‚ Mode set | | 
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Appendix Ì 
De BIOS-sprongtabel 


âdres 


$ú0GG 
$0008 
$000C 
$0010 
$ú01 4 
118 
FD 
$002û 
$0024 
160,5 
$0030 
$0038 
$Ò0Ih 
Où 
$0ûët 
$0044 
$6047 
$0044 
$004D 
50059 
$0053 
36056 
$0059 
$ÒÒ5C 
$005F 
$042 
30064 
$0069 
$00ál 
30ù6F 
$0072 
$0075 
$0078 
$007B 
$007E 
+008t 
19004 
$ÛB7 
$008Â 
$008D 
$0050 
$0033 
$0075 
4009? 
+050 
$COSF 
$CUA2 
$0UA5 
$00AB 
$CA5 
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Naza 


ChkRan 
Synchr 
Rd5lt 
ChrBtr 
Ursit 
Dutôo 
CaiSli 
bLoapk 
EnaSlt 
Geïypk 
Calif 
Keyint 
Init 10 
IntFné 
BisScr 
EnaScr 
WrtyDP 
RdVra 
WriVra 
Betkd 
Setirt 
FilVra 
LDirMV 
LhirVK 
Chad 
ChgCir 
NAI 
ClrSpr 
Inilxt 
lnit32 
Iniërp 
Inabit 
Get Tut 
Set 32 
Setbrp 
Setilt 
CalPat 
Calâtr 
GSp5iz 
Erpfrt 
Gicini 
WrtP55 
RdPS5 
iris 
ChaNS 
Châet 
Chfuc 
LptDut 
Lpt5tt 
CnvChr 


Functie 


Controleert het RäM en seiecteert slots 
Cantroteert een BASIC-karakter 

Leest RAM uit opgegeven slot 

Verzorgt zen volgend BASiC-karakter of -token 
Schrijft deor in RAM in opgegeven slot 
Verzorgt uitvoer naar het huidige device 
Gpringt naar een subroutine in opgegeven zlat 
Vergeiijkt de registerparen KL en DE 

Schakelt een geselecteerd siot peraanent in 
Beert het type van zen EAGIG-operand 


Springt naar een subroutine in een ‘afgelegen’ 


Kardwere=interrupt en keyboard-scan 
Initjaliseert IÙ-devices 

Inittaltseert functietoetsen 

lek het schera ‘uit’ 

let het schera ‘aan’ 

Schrijft in een VOP-register 

Haalt een byte uit het video-RAN 

Scnrijft een byte naar het video-RäM 
Initialiseert de VOP voor een teesopdracht 
Initiaiiseert de VDP voor een schrijfopdracht 


(ij 


slat 
(1) 
(2) 
(} 


(z 


Vuit een stuk videogeheugen aet een gegeven waarde 


Kopieert een stuk videogeheugen naar Rek 
Kopieert een stuk RAM naar het videogeheugen 


Verzorgt de inschakeling van een gewenste \DP-pode 


Verandert de VÒP-kleuren 

Verzorgt een Non Maskabie Interrupt 
Inittaliseert aile sprites 

Initialiseert de VDP voor tekst-aade dl +324 
inittalaseert de VDP voor tekst-zode 32lt}24 


Inittaliseert de VOF voor high resolutian-acde n.v.t. 


laitieliseert de VFD voor aulticotor-2cde 
Steit de VDP un op tekstaade 40[2}24 
Stelt de VDP in op tekstaode 40lri32 
Stelt de VP in op high resolution-agde 
Steit de VDP in op zulticolor-acde 

Geeft het adres van een sprite-patraon 
bGeett het adres van de sprite-attributen 
Geaft de huidige sprite-grootte 

Plaatst een karakter op het grafische schera 
Init1aliseert de P56 

Schrijft tn een P5b-register 

Leest gen P5G-register uit 

Start het uitlezen van de muziek 

beeft de status van de keybaard-butfer 
acht op het invoeren van een karakter 
Voert een Karakter uit naar het schera 
Voert zen karakter uit naar de printer 
Controleert de printer 

tet karakter aet ‘grafische header’ oa 


11) 


(+) 
tr) 


(z) 
(£) 


(t; 


(e) 


(fj 


(£} 
Li) 


invoer 


Bizadres van karakter 

=slot ID / Hlzadres 

Kl=adres van karakter 

zsint ID / Hl=adres / Ezbyte 
h=karakter 

IY=slot Ik / M-adres 
HL / DE 

f=zslot ID / Hi=adres 
fie vet, 

RST 5Û / ID-byte / adras-word 
Mi kaka 

Ns Yet, 

Rr 

AAS 
Nett. 

B=byte / C-VDP register 

HL =adres 

Hizadres í A=byte 
Fizadres 

Ki =zadres 
Hi=adres / HC-iengte / Azbyte 
HL=eran / DEzobiect / BÜ-iengte 
HL=bron / DEzobject / BC-tengte 
heschera-ande 
n.v.t. 
n.v.t. 
Hevels 
n.v.t. 

n‚v.t. 


nev.t. 

mot. 

nyet. 

Ny. t. 

a.v.t. 

A=sprite ID 
A=sprike ID 
neit 

R=karakter 

Met. 

AzF5o register / E=oyte 
h=PSb register 
n.v.t. 

nvt, 

heteta 

Â=tarakter {code 
A=karaëter (code: 
Aa Saks 

A=tarakter 


Uitvoer 


n.v.t,a.v.t. 

Ázkarakter / HL=volgend 

A=bybe 

A=karakter / Hi=volgend 

fv. En 

n‚v.t. 

routtne-afhankeii jk 

flags eventueel uadated 

MW: 

Af =tyne 

routineafhankelijk 
Net 


A 
h 
h.v. 
n 
n 
Nn 


=by 
NY. 
nv. 
N.Y, 
n‚v. 
nv. 
A.v.t. 

nvt, 

Nevel. 

Aias 

ntt. 

hkte 

n.v.t. 

naval. 

NeVet. 

n.v,t. 

n.v.t. 

nvt, 

nst 

HL=adres 

bzadres 

fÁ=groatte 

n.v.t. 

n.v.b. 

n.v.k. 

A=oyLe 

n.v.t. 

zero updated 
A=karakter (ende) 

Mi vak, 

carry updated 

A en zero updated 
Carry en zero updated 


… - El … 
eet eee ee ern ren rn Pet err 
. . - = . mm . . = . 


$ÒORE 
$ÒDBL 
$00Hd 
$00B7 
A00 
$00BD 
30000 
F00C3 
$00C4 
3009 
$00CT 
$00CF 
$00D2 
$06D5 
$0jD8 
$00DB 
$00DE 
$ODE! 
$0DE4 
$0GE7 
SCOER 
$ÒGED 
30OFÒ 
FCF 
$OÛr 
$04F9 
$O)FG 
$ÒUFF 
$0102 
s0165 
$0163 
36105 
$Ò1dE 
3011 
30114 


$DL17- 


$DLLA 
$Ö11D 
$0120 
$0123 
$û125 
$0129 
80120 
tOL2F 
$ûl52 
$0135 
30154 
40138 
$OLSE 
$01â1 
$0144 
$0147 
$ûl 4 
tCL4D 
$0150 
+153 
$úl5á 
$0158 


(ij; de functie inforzeerkt en/of verandert het (yariabelenbwerkgebied 


PinLin 
EnLin 
Binlin 
Break? 
IsCnte 
EkOntc 
Beep 
Cls 
PasIt 
Faksb 
EraFnk 
DspFnk 
Talext 
GtStck 
GtTrig 
bt Pad 
btPdì 
Tap lon 
Tap In 
Taplof 
Tapban 
Tapdut 
Tap daf 
StMotr 
Lità 
PutG 
Righte 
Leftt 
Up 
TUD 
DawnC 
ThawnC 
ScaliY 
Manic 
Fetch£ 
StoreC 
Setätr 
heads 
Get£ 
N5et CX 
EtAspc 
Pnt Ini 
ScanÂ 
Scanl 
ChgC ap 
Chgönd 
RäìReg 
WElReg 
RoVDP 
SnsMat 
PhyDiü 
Foraat 
[sF1I0 
Outbip 
bet VER 
betic? 
Ki lBuf 
Cal EAS 


Leest zen bewerkte regel in 

Leest een bewerkte regel in {+} 
iet '? ‘ op het schers en springt naar INLIN 
Controleert op CTRL-STOP 

Eontraïeert op SHIFT-STOP 

Isôntc, gäar nu door BASIC 

Verzorgt een BEEP 

Maakt het scherm schoon 

let de cursor op een bepaalde plaats Le) 
Kijkt of de tekst-tunctietpetsen ‘aan’ staan 

Haait de tekst-functietgetsen van het schers 

let de tekst-functietoetsen op het schers 

Zet het schera in tekst-aode 

Leest de joystick-stand uit 

Leest de vuurknap-stand uit 

Leest de touch tablet-stand uit 

Leest de paddle-stand uit 

iet cassette-invoer aan en beest header 

Leest cassettesignaal in 

let cassette-invoer uit 

let cassette-uitvaer aan en schrijft header 
Schrijft cassettesignaal 

let cassette-vitvoer uit 

let cassettemotor aan/uit 

geeft de ruiate in de auziekstring 1x) 
Plaatst een byte in de muziekstring tr) 
Beweegt | pixel naar rechts 

Beweegt ij pixel naar links 

Beweegt 1 pixel oehoog 

UPC indien aogeitjk 

Beweegt | pixel calsag 

DORNC indien sogelijk 

Iet de grafische coördinaten op schaal 

Eerekent adres van grafische coördinaat 

Gaaft het adres en aaskerpatroon 

Plaatst het adres en gaskerpatrocn 

Vult het atkribuut-byte in 

Leest het attrisuut-byte van geen pixel 

Vult het attribuut-byte van een gizel in 

Vuit een aantal pixels herizantaal 

Berekent een cirkelverhauding (+) 
Initialiseert de PAINT-routine (+) 
loekt pixeis naar rechts 

laekt pixels naar links 

Verandert de status van de CAP-indicator (2 
Wijzigt de key click (zr) 
Leest het priaaire slot-register 

Schrijft naar het priaaire slot-register 

Leest het VDP-statusregister 

Leest een rij van de keyboard-aatrix 

Bestuurt de eventueel aanwezige diskdrive 
Initialiseert de eventueel aanwezige diskdrive 
Bekijkt het eventuele optreden van device=!0 
Verzorgt geforaattpeerde uitvoer naar de printer (#} 


Geeft de pointer van de auziek-string (4) 
beeft de pointer van een gewenste suziekvariabele 
Initiaiiseerk de keyboard-butter La} 


Spriagt naar de BASIC-interpreter 


n.vot, 
hev.t, 
n.v.t. 
nev.t. 
n.v.t, 
nvt. 
NVE. 
zero 
H-kolag / L=regel 
Bevt. 
TAS 
MAS 
nvt. 
A=joystick ID 
=vuurknop ED 
A=tablet Ib 
A=paddle ED 
n.v.t, 
nvt. 
n.v.t. 
Â=header type (G=kart} 
k=oyte 
Teva te 
zactie (Q=stop / t=start) 
K=array-nuaaer 
R=array-nuaner / E=hyte 
nvt, 
nevot. 
n.v.t, 
nev. t, 
nv.k, 
Asv.t, 
BC K-caörd. / DE Y-coörd, 
EC Y-coörd, / DE Y-coörd, 
hevk, 
Ëzaasker j Klzadres 
A=kleur 
nvt. 
n.v.t, 
HL=tel ler 
n.v.t,DEsâspCti / KL=ÂspCt2 
=kleur 
D-tlag / DE=teller 
B-flag f/ DEztelier 
A=aan/uik (O=yit) 
Azaan/uit (Ozuit) 
n.v.t, 
A=byte 
n.v.t, 
A=r egel 
IQ-sthankeli jk 
lO-afhankelt jk 
n.v.t. 
A=karakter (code) 
A=kanaal 
L=byte 
n.v.t. 
IX-adres 


Hl=zadres / carry updated 
KL=adres / carry updated 
Hl=adres / carry updated 
carry updated 

nvt, 

n.v.t. 

fevst. 

nvt, 

Nev.k, 

n.vet. 

nvt, 

n.v.t. 

n.v.t, 

A=richting 

Á=vuur (O-niet} 
A=naarde 

zwaarde 

carry updated 

A=byte / carry updated 
nuvat, 

carry updated 

carry updated 

N.v.t, 

nvt, 

HL=ruinte 

zero updated 

har.t. 

n.v,t, 

As vot, 

carry updated 

Matt: 

carry updated 

Carry updated 

HL=zadres / A=patroan 
HL=adres / A=patraan 
n.v.t, 

Carry updated 

A=kleur 

n.v.t, 

n.v.t, 


n.v.t. 

DE=telter / C-4lag 
DE=teller / C-#Ìaq 
A.v.t, 

N.v.t, 

f=byta 

n.v.t, 

f=status 

A=status 
I0-afhankelijk 
10-afhankelijk 
fatype [U 

n.v.t, 

HL=adres 
KL=pointer 

n.v.t, 
BRSIC-afhankeli jk 
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Appendix J 


Het werkgebied 


Adres 


$P 580 
$F 585 
$P JAL 
$r3IÂ 
+ 39L 
$r 59E 
$P 5AÔ 
$P 5A2 
$P 3Aä 

F5kb 
$F5A8 
$P SAR 
FE SAC 
$F RE 
+ JÊP 
$F3B0 
$P 3Bt 
$F 352 
$F 355 
$F3B5 
sr 3E? 
$F 385 
$F SEB 
$F3ED 
$r dr 
+F SCI 


rm 
ESC3 


$F3C3 
$F3CB 
$F SCL 
$F SCF 
$F5DÍ 
3E DS 
+505 
$ESD7 
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Kaan 


RdPrin 
WrPFria 
CiFrin 
úsrû 
Üsri 
Usr? 
User 
Úsrá 
Úsr5 
Usrá 
Usr7 
UsrB 
Usr? 
LinLáû 
Linl 32 
LinLen 


Clatst 
TxthRan 
xtCol 
TxtCap 
TstBtr 
TxtFat 
TS2Naa 
T52Coì 
T52Cgp 
TS2ätr 
T32Pat 
Grpilaa 
ErpCol 
ErpCap 
Er pâtr 
ErpPat 
KltNan 
fltCoì 
KltEgp 
Mitâtr 


Er Tr DP Me We Me WD Ie WO Ie DO De WW PP DP TP Ir 


Functie 


Slot-schakeling en uitlezen (primair) 
Slot-schakeling en wegschrijven (primair) 
Slot-schakeling voor GALSLT 

Adres Vsrù (default ILLEEAL FUNCTIOK CALL} 
Adres Wsrt (default "ILLEGAL FUNCTION CALL ') 
Adres ter? (default 'ILLESAL FUNCTIGH CALL’) 
Adres Usr3 (default ‘ILLEGAL FUNCTION CALL’) 
Adres ard (default ‘ILLEGAL FUNCTION CALL’) 
Adres Usr3 (default ILLEGAL FUNCTION CALL} 
Adres Úsrá (defauit ‘ILLEGAL FUNCTION CALL} 
Ádres Usr7 (default 'ILiE&AL FUNCTION CALL} 
Adres Usr8 (defauit ILLEGAL FUNCTION CALL 'j 
Adres Usr9 (default ILLEGAL FUNCTION CALL’) 
Scherabreedte in 30#2â tekst-eode (default 5/Ì 
Scherzbreedte in 32424 tekst-aode (default 29) 
Actuele schermbreedte {mordt tijdens scherm-inschakeling gekopieerd! 


Ruiate voor PRINT-functie (default 1d) 
Namentaoel (40424) (default #0060) 
leurentabel (40124: (default #0000) 
Karakterset (40424) (defauit 40800) 
Sprite-attributen (40£24) (default $0060} 
Sprite-patronen (40424) (defauit $0000) 
Naaentabel (54424) (default $1600} 
Kleuyrentabei (52424) (default $2000} 
Karakterset (52524) (default 50000) 
Sprite-attributen (32424) (default $1B00) 
Sprite-patranen (32424) (default £5800) 
Naaentabel {hires) default £1860) 
Fleurentabel (hires) (default $7000) 
Karakterset (hires) (default £6000) 
Sprite-attributen (hires} (default $1B00} 
Sprite-patranen {high res) (default $5500) 
Namentabel (multicolor) (default $086D) 
Kleurentabei (rulticolor) (default $0600) 
Karakterset (multicoler) (default $0600) 
Sprite-attributen teultieotar) (default $1500} 


3F3D9 
$F SDB 
FF5DC 
$F5DD 
$r5LE 
$F SDP 
$F 5E) 
$P SEL 
$r EZ 
3F3ES 
$r3EÀ 
$P ES 
$FJES 
$P SE? 
$F5EB 
4F3E3 
$FSER 
$FSEB 
sf JEL 
$FSEF 
3F5F2 
$F3r3 
SP5FD 
$FSFG 
3F3F7 
$F SFO 
$E SFA 
$F SFC 
$r401 
$F40b 
$F408 
$rdùR 
$FA0B 
$rA0D 
$F4OF 
$F414 
$PAi5 
$râló 
3EA1} 
+r4i8 
3r413 
+FALB 
$F4iL 
$FiP 
SPE 
$r46l 
$Fbb2 


KitPat 
Clik5u 
CsrY 
CsrX 
CnsDfg 
RgöSav 
Ral5avy 
RoZa 
Ro35av 
Ro45av 
KgaSav 
RgêSav 
Rg?Sav 
StatF] 
TrgFla 
ForCìr 
BakClr 
BorGir 
Kaxipd 
Minlpd 
AtrByt 
Queues 
Frechen 
ScnCnt 
Repünt 
PutPot 
GetPnt 
Csl200 
E52400 
Low 
High 
Header 
AspCti 
AspCt? 
EndPrg 
Errf lg 
LptPas 
PrtFig 
KEHS(P 
RanPrt 
Vlzâdr 
VizDat 
GurLin 
KBuí 
Buf 
TtyPas 
Diaflg 


ee == 


nn A On On a 


On He a EO EN TT 


tn NO OAT OT TU "0 Ee OT AT 


Sprite-patronen (aulticotar) (default $3800) 
‘Klik’ bij druk op toets 
Verticaalcpârdinaat van de cursor 
Harizontaaïlcaördinaat van de cursor 
Functietoetsen op het scherm? (Ozniet) 
Kopie ViP-register Ô (default #60} 
opie VDP-register { (default $FO) 
Kopie VDP-register 2 (default #00) 
Kopie VOP-register 3 (defauit #00) 
Kopie VÒP-register à (default $01} 
Kopie VEP-register 5 (default 300) 
Kopie VIP-register á (default #00) 
Kopie VlP-register 7 (default $F4) 
VDP-statusregister (default $0h} 
Status van alle vuurknoppen 
Huidige vaorgrondkleur (default 15) 
Huidige achtergrondkleur (defauit 4) 
Huidige borderkleur (default 4) 
Sprang voor LINE-routine 
Sprang vaar LINE-routine 
Penkleur voor grafische routines 
Contraleblokken voor de drie guziek-arrays 
Fiag voor CLOAD (onderscheid tuszen CLOAD en CLORG?, G=CLOAD} 
Frequentie keyboard-scanning 
Snelheid keyboard-repetering 
Adres van de volgende ‘plaats’-positie in de keyboard-butfer 
Âdres van de volgende ‘haal'-positie in de keyboard-butter 
Parameters voor 1200 baud-cassette 
Paraaeters voor 2400 baud-cassette 
LAAG-cyclus 
KOOE-cyclus 
Cycli in aanloapblok 
Verhouding stralen van CIRCLE 
Verhouding stralen van CIRCLE (default) 
Lege BASiC-regel (vaor ‘ON ERROR, “) 
Nuaner van de opgetreden fout 
Positie van de printer-kop 
Uitvoer naar schera af printer? (Ò=schera / 1=printer) 
Hoe wordt de printer gratisch aangestuurd? 
Hoe worden de grafische karakters naar de printer gestuurd? 
Adres van karakter voor VâlL-functie 
Waarde van karakter voor VÂL-functie 
Het regelnuaaer dat nu wordt verwerkt door de interpreter 
becodeerde vore van een ingetypte regel 
Tekst die INLIN heeft ingelezen 
Positie op het schera voor PRINT 
laekroutine voor array-variabelen 
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$F 565 
$r A54 
$r 665 
$F&bö 
$róbö 
$r 663 
$F56Â 
$Fár2 
36/5 
$F67ö 
$F678 
SFOR 
$F 590 
$F55D 
$F49D 
$P ESP 
$FARL 
$F ORS 
$F ARS 
$rbhG 
$FGA? 
$F5A9 
$rGhA 
$FAAB 
$r6ÂD 
$raÂF 
$F AEL 
$rB5 
$FAD5 
$F5B/ 
$E 48% 
$raD5 
$F ab 
$P SBE 
$F&CÛ 
tal? 
$F6C4 
$rälë 
$F4C8 
$FaLÂ 
SFAEÏ 
EFAEL 
$róE5 
$r7L 
$F7ÄE 


ValTyp 
Dores 
DoNur 
ConTxt 
Con5ay 
Conlyp 
Conta 
HenSiz 
StkTop 
TxtTab 
TeapPt 
TeapSt 
schap 
Frelop 
Teaps 
Tenp3 
EndFor 
DatLis 
SukF Lg 
Figinp 
Teap 
Ptrf1g 
hutFig 
dutLin 
Aut Inc 
SavTet 
Gav5tk 
ErrLin 
Dat 
ErrTxt 
OnELin 
BnEFlg 
Teap? 
Oldiin 
OidTxt 
Var Tab 
AryTaù 
EtrEn 
DatPir 
Def Tbl 
PraStk 
Praten 
Paral 
PraFry 
Pralnd 
Para 


Praflg 


u 


mn On On an 


«Ie EU KO Te Ke Te Te ED 


Ir De 


Xr Ie 5 On OT On OT On a 


Er 5 5 


Ln EN OT Ir Hel 


Type van de variabele in DAC 
Flag voor het scannen van een DHtâ-regel 
Flaq voor oazetten van regeinusner 
Ädres voor eerstvolgende Karakter NÀ een numerieke constante 
Token-opslag van een nuserieke constante 
Type-opslag van een numerieke constante 
Opslagruiate voor numerieke constanten 
Top van het stringgeheugen (wijzigen met ELEAK of HAAFiLES) 
Top van de stapel (wijzigen met CLEAR of KAAFILES) 
Bodea van het progransageheugen (default 38001) 
Stringstapel 
String-signalementbuffer 
Eerstvolgende vrije ruiante in het stringgeheugen 
Interpreter-ruiate (algemeen gebruik) 
Interpreter-ruiate (aigeneen gebruik) 
FOK, „NEXT -werkpointer 
Regelnumser van huidig DâTA-statesent 
Variabelenindas 

lag voor verschil tussen INPUT en READ (G=1NFUT} 
Interpreter-ruiste (algemeen gebruik) 
Flag regelnuameradres 
Flag voor AÜTO (Ö=geen AUTO} 
Huidige regelnunger tijdens uitvoering van AUTE 
Regelverhaging tijdens RITO 
Adreswijzer van interpreter 

Adreswijzer van de stapel 
Kegelnunder indien er een fout optreedt 
Wueaer van de laatst behandeide regel 
Buffer voor SAVTT 
Adres voor ON, .,ERKUR 
Flag voor ON,..ERROR (fzerror opgetreden? 
Interpreter-ruinte (algemeen gebruik) 
Regeibuffer voor pragraama-onderbreking 
Stategent-buffer voor progranna-onderoreking 
Eerste byte in het vartabelengeheugen 

Eerste byte in het array-geheugen 
Einde array-geheugen 
Adres van huidige DATA-staterent 

Type van elke groep BRSIC-vartabelen (A... 2} 
Startadres van Fi-paraneters 

Lenete van het FS-blok dat in FARM staat 

Lokale variabelen van een geevalueerde FH-functie 
Adres van FN-olo 

Lengte van het FW-blok dat in PARM2 staat 
Variabelenconstructie voor FN-functie 

tag voor onderscheid tussen globale en lokale variabelen 


$P 185 
$F7B7 
$f 758 
$P 7 BA 
$F7BC 
$P 74 
$F7C5 


en 


$FFÜ 


3950 
$FISr 
3 3âl 
èr3ä2 
$F74ä 
4F345 
$F947 
$r543 


Aryiad 
NoFuns 
Teap? 
Funâct 
SwpTap 
IrcF lg 
FBuffr 
DecTap 
DecTaed 
Decint 
Dac 
Hoi dd 
Arg 
And 
MaxFil 
Filiab 
NulBut 
PrtFi] 
Filkaa 
FiiNa? 
Nioiy 
SavEnd 
FnkStr 
CaPnt 
Naalias 
Cgpbas 
Patbas 
ätrBas 
Clac 
CHâsk 
Kinbel 
Max bel 
Âspect 
Genünt 
CLinef 
EnPnts 
CpiptF 
CpCnt 
CpCntë 
Crcôua 
Cstünt 
CSE1XY 
CSaveù 
CSaveN 
C10++ 
CiOtf 
Lohitsk 


Co a EU on 2 


En 


Er Pe Ie Pe PU OE ee OT OE Er Hr He Ol EN KO EN ID 


r 


OO a OE OT OT 


Eindadres van het thans doorzochte variabelengeheugen 
Signalering van lokale variabelen 

interpreter-ruiste (algemeen gebruik) 

Ket aantal F-functies thans in gebruik 

Buffer voor SHAP-stategent 

Flag voor de TRALE-functie O=geen TRACE} 

Buffer voor nuaerieke output 

Tijdelijke opslagruiete voor deeiroutine 

Tijdelijke opslagruinte voor deelroutine 

Teller voor deelroutine 

Friaaire buffer voor expressie-evaluatie in de interpreter 
Butter voor veraenigvuidigingsroutine 

Secundaire buffer voor expressie-evaluatie in de interpreter 
Buffer voor huidige randoe-waarde 

Aantal aogelijke ID-butters 

Adres van pointer-tabel voor file-controleblokken 

Adres van het eerste byte van de databuffer van IO-buffer 0 
Âdres van het file-contraoleablok van de huidige ID-buffer 
Euffer voor bestandsnaas 

Buffer vaar ingelezen bestandsnaam 

Status voor IO-buffers tijdens LOAD 

dres voor het laatste byte tijdens B5ÂVE 

Butter voor functietoetsen-strings 

Siot en adres voor de te kopiëren karakterset 

Startadres van de huidige nasentabel voor de VijP 
Startadres van de huidige karaktertabel voor de VOF 
Startadres van de huidige spritke-patronentabel voor de VDP 
Startadres van de huidige sprite-attributentabeì voor de VD 
Positie van de laatst verwerkte pixel 

asker gebruikt tijdens de laatste pixel-operatie 

Minimaal verschil voor LINE-rautine 

Kaxiaaal verschil voor LINE-routine 

Stralenverhouding tijdens CIRCLE 

Teller voor plot-routine tijdens CIRCLE 

Flag voor CIRCLE-routine 

Aantai segsent-punten voor CIRCLE 

Flag vaar CIRCLE-routine 

Y-coordinaat tijdens CIRCLE 

Aantal punten thans geplot tijdens CIRCLE 

Teller voor CIRCLE 

Aantal punten Binnen starthoek tijdens CIRCLE 
Bfplattings-flag voor CIRCLE 

Tijdelijke ruinte vaar SCANR 

Tijdelijke ruinte voor SCAHR 

Tijdelijke apslagruiete voor CIRCLE 

Tijdelijke ogstagruiste voor CIRCLE 


Tijdelijke opslagruiate voor PAINT 
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sE 
$F94B 
$F94D 
$FJ4F 
4F951 
$F 553 
$F95À 
$F955 
$F956 
sr 958 
$F959 
$F971 
$F075 
Er rs 
$FA75 
$FAFS 
$F835 
$FB3ó 
$F538 
$F E33 
$F53B 
$FB3C 
$FBJE 
SERIF 
$FBAD 
HE BAL 
iFBôb 
$FBEE 
$FEBÒ 
SFB 
$FBE2 
$FBCA 
$FBEC 


enn 
$TEL 


EN Ke 


TT FEI EO EA 


vet 
GEN En 


Lohbir 
LohÂdr 
LohEnt 
SkpEnt 
KovEnt 
PdiRer 
LfPrag 


Kel Tab 
Aciflg 
GueTan 
GueBak 
Voichf 
Vaicki 
VaicLh 
Re218 
Prstnt 
SavSp 
VoiceN 
SavYol 
AclLen 
BciFtr 
Bueuel 
Husick 
Plyat 
Vchâ 
Vod 
VebL 
EnStop 
Baskoa 
Lint 
FstPos 
CurSav 
Fnköni 
FnkFig 
Ünbsbt 
tikP] 
Cldfey 
Kearey 
KeyZuf 
Lindrk 
Fatkrk 
Bottoa 
Kikes 
Trpibì 


KE CU LC En a PU 5 


Er U On OT TE =T 


Er HO A OO EK EF 5 


a 


Nieuwe scan-richting tijdens PAINT 

Adres van meest jinkse uitstulping tijdens PAINT 
brootte van linker uitstulping 

kantel pixels over te slaan tijdens PAINT 

Aantal bewegingen tijdens PAINT 

Huidige richting tijdens PAINT 

Flag voor beweging naar links tijdens PAINT 


Adres voor macro-ontledertabel (DRAN of PLAY) 

Flag voor nacro-ontledergebruik (DRAK of PLAY) 

Parameters voor afspelen van auziek (A#6) 

Brootte van de auziek-arrays (441) 

Muziek-array kanaal Â 

Buziek-arrav kanaal È 

Kuziek-array Kanaal & 

Rij voor het R5252-kanaal 

Teller voor de PLÄY-rcuttne 

Opslag van de 18û-stapelwijzer tijdens PLAY 

Nummer van het thans gebruikte kanaal tijdens PLAY 

Opslag van het volume tijdens een R-verwerking 

Lengte van de huidige aacro-ontlede string 

Adres van de huidige eacro-ontlede string 

Het nuaaer van de thans verwerkte auziek-array 

Flags voor te verwerken auziek-array(s} 

Aantal opeenvolgende PLAY-statesents 

Parageters voor PL&Y-rcutine, kanaal Â 

Paraseters voor PLAY-routine, kanaal D 

Farageters voor PLAY-routing, kanaal 

Flag voor warae start tijdens interrupt (Ö=geen warae start) 
Flag voor CTRL/STOP-reactie (Ò=geen reactie) 

fFiags voor het ‘overlopen’ van een scheraregel (244) 

De coördinaten van de cursors icv.n. terugrekening bij ‘overloop’ 

Opslag van het karakter dat werd vervangen door de cursor 
Bijhouden welke groep tenctietaetsan wordt afgebeeld 

Flags of functietpetsen in werking (10H 

Aantal interrupts bijhouden (bijv. intussen opgetreden ID e‚d,) 
lag oa te zorgen dat er aaar één ‘klik’ tegelijk wordt gegeven 
Hutter vaor het opslaan van de ‘vorige’ keyboard-gatrix 

Butter voor het opslaan van de ‘huidige’ keyboard-satrix 
Keyboard-butter 

EiOS-buffer on een hele schersregel op te kunnen slaan 

BiûS-butfer vanr het opslaan van een Ö(#18 pixel-patroon 

Laagste Rif-adres (default 8500) 

Hoogste RÀR-adres (default $F560) 

Interrupt-veroorzakers 

Key D 

Key Ì 


$FC52 
37650 
$FC58 
$FC5B 
Hr LE 
$FLóÎ 
$FL64 
$EC67 
$FLER 
$FCöD 
$FC7Ô 
$FL73 
$rT76 
$FC79 
+76 
SPE 
$r CBZ 
$FTB5 
$FCB8 
$rC5Ë 
+FCBE 
$rC91 
37094 
$FC77 
$FC9E 
$FC9L 
+FCSD 
$FCRE 
$FCRÔ 
$FCA2 
$FCAA 
$FCAS 
3 LÂb 
$FCA7 
$FCAG 
$ECAS 
$FCAR 
$F CAE 
$FCAC 
$FCAD 
$P CHE 
3E CAF 
fr CBO 
+1 CBÌ 
$FCH2 
$F LES 
+FCH3 


IntFig 
PadY 
Pad 
Jiffy 
Int Yal 
IntEnt 
Loul in 
WinWid 
GrpHed 
EscCnt 
InsFig 
CaRSr 
CStyle 
CapSt 
KanaSt 
Kanalid 
FlhHen 
Scr od 
OldScr 
CasFry 
Erdâtr 
GÄPos 
6YPos 


Vi 

fl 
Vik 
VAR 
VIR 
VZ 
Vià 
Viâ 
V/A 
V/R 
V/A 
Vi 
V/A 
V/A 
V/â 
V/A 


Ee OT OAT TT TT 


OT a 


rn 
in 


De Te 


Kay d 

Key 3 

Key 4 

Key 5 

Key & 

Key / 

Key 8 

Key 9 

STOP 

Sprite 

Strig Ò 

Strig 1 

Strig 2 

Strig 3 

Strig À 

Inter val 

ng. 

n.g. 

h‚g. 

ng. 

ng. 

nd. 

ng. 

1.g. 

(CTRL/) STOP-detectie 

Y-positie touch tablat 

Á-pasitie touch tabiet 

Tiaer 

Tijdsduur vaor ON... INTERVAL 

telling i.5.m. ON... INTERVAL 

Duur van startbit bij lezen van cassette 

Tijdsduur hoog/laag-cyclus bij lezen van cassette 

Flag voor grafische header (Ozgeen grafische header) 

Flag voor ESC-verwerking (O=geen escape-code) 
lag vaar INSERT-gode (Û=geen INSERT) 

Flag voor ‘cursor in beeld’ (O=geen cursor} 

Flag voor cursor-type (Ozblok / anders=80414} 

Flag vaar ‘Caps Loek’ iÔ=geen ‘Caps Lock'i 

Flag voor ‘Kana Lock’ (Op Japanse gachines) 

Keyboard-gode op Japanse machines 

Flag voor onderdrukking IC-toutaeldingen 

Huidige schera-aode 

Vorige schera-aode 

Vorig opgeslagen karakter vaar cassette 

Randkleur voor PAINT-routine 

Opslag High-Res X-positie 

Opslag High-Kes Y-positie 
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$FCH7 brpäci A Huidige Á-positie voor GRPPAT 

$FCH3 Grpâct A Huidige Y-pasitie voor BRPPRT 

$FCRB DreFlg V Flag voor DRAK-routine 

$FCBC DrwScl \ ‘Scale factor’ voor DRA 

$FCED Draâng V Gebruikte hoek bij DRR 

$FCBE KunBnt JV lag voor BLAUD get RK-parageter (Ô=geen auto RUN) 
SFEEF SavEnt A dres voor BSÀVE (en BLOAD: 

$FCEL Explbi WW Flags voor expanded slots 

$FCE5 Sitibi Y Kuidige toestanden van de expanded siot-registers 
$FCE3 Sitâtr P Parameters voor uitbreidings-KHS's 

$FDOG Sitirk B Kagelijk werkgebied voor uitbreidings-K04's 

$FE83 Pracäa B Naan van een statement of apparaat i.v.a. uitbreidings-RÜf' Ss 
3D Device VW Device-ID voor een uitbreidings-KÜf-adres 


B: buffer 

P: parameters 
KR: routine 

S: sprong 

s variabele 


_ 
Bn 
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Appendix K 
HOOKS 


$PEOS 
$FEO8 
$rEOD 
$FEL2 
$PEL7 
$FEIC 
$FEZI 
$rE2S 
$FE2B 
$FE5O 
$PEJS 
$FESA 
$PESP 
$FERA 
$FEAS 
$FE4E 


H.Tial 
KH. ChFu 
H.DspC 
H.Eral 
HK. DspF 
H.Erar 
HK. TaTe 
KH. Chbe 
K. IniP 
H‚KeyG 
H.Keyd 
K.NHI 

H. Pint 
H. Bint 
HK. InLi 
KH, nog 
H.bskD 
HK. Sets 
HK. Hane 
H.kill 
HK. Inl 


HK. Fie} 
H.Mkië 
H‚Mkid 
H. Akds 
H. Cvi 
K. Lys 
H‚Cvd 
H. GetP 


Functie 


Interrupt, voornaselijk tiser-gestuurd 
Standaard CHFUT 
Plaats cursor 

Verwijder cursor 
Standaard DSPFNK 

tandaard ERAFNK 
Standaard TOTEXT 
Standaard CHBET 

Kopteer karakterzet naar VDP 
Keybaard decoder 
Keyboard decoder isneì} 
Standaard KM] 
Standaard PING IH 
Standaard &INLIN 

tandaard IRLIN 

ON- device GOT procedure 
Disk Output (DSKOS) 
SET 

KENARE 

KilL 

Initial Prograa Load (IPL) 
COPY 
CHO 

Disk Free (DEKF 

Disk Input (DSKIÉ) 
ATIR$ 
Left Set (LSET} 
Right Set (ROET) 

FIELD 

Make Int (MKI4 
Make Single (MKI$ 

Make Double (REDE) 

Convert Int (CV) 

Convert Single (CVS 
Canvert Double (CVD 
Standaard BETPTR (get file pointer) 
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$FESS 
$FEGG 
$FE5D 
$FE? 
PES] 
$FEAL 
+FE7I 
$FEJb 
FEB 
$FEBÔ 
$r EB 
$FEBA 
$FEBF 
$r E94 
$FE99 
$PEGE 
$FERS 
+FEAB 
$FEAD 
$FEB2 
$TEB) 
$FEDC 
SPEL 
$rELG 
$FECB 
$FEDO 
$FED5 
FFEDA 
$FEDF 
3FFE4 
$FFES 
$FEEE 
$PEFS 
$FEF3 
$rEFD 
$FrO2 
$rED] 
EPFDC 
SEF 
3FFiá 


H. SetF 
H. NoFo 
K‚ Huta 
H.NEFI 
HK. Merg 
H. Save 
H‚Rins 
H‚ Bink 
K.File 
H, Dbet 
K.FilD 
H. InDs 
H‚RsiF 
H, Savd 
H. Lac 

H‚ Lof 

H, Eof 

H.FPos 
HK. Bakli 
H.Pard 
H. NoDe 
H.PosD 
H. DevN 
H. Gend 
H. RunC 
H,Ciea 
H.LopD 
H, StkE 
HK, isFì 
HK, Cutd 
H.CrDo 
H‚ DskC 
H. Door 
H‚PrgE 
H.ErrP 
H.ErrF 
HK. Read 
K‚ Hain 
H.Dirb 
K.Finl 
H.FinE 
ú.Crun 
H.Crus 
H,Tske 
K‚NEFn 
H, Sn6t 
H. News 


Standaard SETFIt (set file pointer) 
Standaard NOFOR (no for clause) t‚b.v. OPEN 
Standaard NULDPN (null open file) t‚b.v. OPEN 
Standaard NTFLO (not file number 0) t.b.v. CLOSE IU-buffer 0 
KERBE 

GAVE 

SAVE (binair) 

LOAD (binair) 

FILES 

DEET 

Standaard FILDUI (seg. uitvoer) 
Standaard INDSKC (seg. invoer) 
Kerselectie oude drive (INPUTS) 

Save huidige drive 

LIC tlokatie-functie) 

LOF (lengte van file-tfunctie} 

EDF feinde file-functie) 

FPOS (file pasitie-functie) 

Standaard BAKUPT (back up-rautine) 
Standaard PARDEY (pass device nace) 
Standaard NODEVN (no device name) 
Standaard PDSDSK (possible disk) 
Standaard DEVMAA (device naze) 

Standaard GENOSP (general dispatcher} 
Standaard RUNC (run-clear) 

CLEAR 

Standaard LOPDFT (loop and set default) 
Standaard STKERR (Z80-stack error } 
Standaard ISFLID (file [D) 

Standaard OUTDD 

Geandaard- CRLF (CRtlinefeed naar OUTDO) 
Standaard DSKCHI (disk character input) 
Standaard DOBRPH 

Standaard PREEND (einde van prograana} 
Standaard ERRPRT terror uitvoer} 

Error verwerking 

‘Alles OK'-gedeelte van de 'KAIN loop’ 
Standaard HAIR (haofdlus) 

Standaard DIKDO (direct statement? 

Einde hoafdlus-invoer 

Einde hoofdlus-error (onjuist regelnummer} 
(Belcoderen BASIC-regels 

(Deicoderen BASIC-regels 

(Delcaderen BASIC-regels 

(Delcoderen BASIC-regels 

FDR 

Nieuw statezent verwerken tzelfde regel} 


$PFJE 
$Frd5 
$Fr48 
$FF4D 
3Froè 
SEF] 
$FFSC 
$rFöl 
$FFLá 
$FFSB 
$EF7O 
$FF75 
SPFJA 
EEP JF 
$rFDâ 
$FFBE 
$EFIS 
$FF 30 
$PFDD 
$FFA2 
SEFR7 
zEFAC 


HK, Sone 
H‚Chr& 
H.Retu 
H.FrtF 
H, Ecap 
H‚FinP 
HK. Trin 
K.Frée 
He. NepL 
H.Eval 
h. OkNo 
K,Fin5 
H, sai 
KH. Widt 
H.List 
H, BufL 
H‚Frgi 
H. Sche 
H.Fret 
H‚Ptrg 
HK. PhyD 
H.Farm 
H.Erra 
K‚Lpta 
H‚Lpts 
KH, Scre 
K.Piay 


Signalering ui 
Standaard CH6E 
RETURN 

PRINT 

PRINT (zoeken naar exclusieve tekens} 

PRINT (einde) 

Invaer-error 

Expressle-evaluatie 

Expressle-evaluatie 

Factor-evaluatie 

Factor-evaluatie 

Factor-evaluatie 

Signalering uitvoerpunt in stategent-verwerking 

WIDTH 

LIST 

Standaard EUFLIN (buffer line) voor (deìcoderen BAGIC-regels 
Standaard FROINT (integer-aarekeningò 

Dazetting van regelnumwer naar adres 

Standaard FREIN (free up to tenporaries) 

Standaard PTRGET (pointer get voor variabelen) 

Standaard PHYDIO {physical disk IO) 

Standaard FORMAT 

ERROR-behandeling... 

Standaard LPTOUT 

Standaard LPTSTT 

SCREEN 

PLAY 


tvoerpunt in statesent-verwerking 
T 
Ï 
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Index 


Ä-register 20 

absolute adressering 24 
accumulator 20 
adressering, geïndexeerde 25 
adressering, impliciete 24 
adressering, onmiddellijke 24 
adressering, zero page 25 
adressering, indirecte 26 
adressering, relatieve 25 
adressering, absolute 24 
adressering, bit- 27 
algemene registers 20 
assembler 15 

BASIC 14 

binaire getallen 56 

BIOS 61 

bit 56 

bitadressering 27 

byte 56 

carry 21 

EPROM 13 

flag-register 21 
geïndexeerde adressering 25 
half carry fiag 21 
hexadecimale getallen 56 
impliciete adressering 24 
indexregisters 20 
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indirecte adressering 26 
interrupt, maskeerbare 48 
interrupt 35, 37 
interrupt-register 22 
maskeerbare interrupt 48 
monitor 15 

nybble 59 
onmiddellijke adressering 24 
overflow flag 21 

parity flag 21 
programmateller 18 
RAM 13 
refresh-register 22 
relatieve adressering 25 
ROM 13 
scherm-modes 115 
sigenflag 22 

sprite 115, 159 

stack pointer 19 
stapelwijzer 18 
subtract flag 21 
VDP-processor 116 
verborgen registerset 22 
word 46 

Z80, opbouw van de 17 
zero page-adressering 25 
zeroflag 21 


Bezitters van MSX-computers weten dat hun machine over grandioze 
mogelijkheden beschikt. Helaas is BASIC, de ingebouwde 
programmeertaal van deze computers, vaak te langzaam om alles uit de 
computer te kunnen halen. 

Enthousiaste MSX-bezitters zijn dan ook geneigd om te experimenteren 
met machinetaal, een taal die veel dichter bij de computer staat dan 
BASIC. Het is echter zeer moeilijk om zonder deskundige begeleiding in 
machinetaal thuis te raken. 


Dit boek zorgt voor die deskundige begeleiding. Het is geschreven voor de 
MSX-bezitter die zich wil verdiepen in de geheimen van machinetaal. 
Enige BASIC-voorkennis is vereist. 

Met dit boek komt u al zeer snel tot spectaculaire resultaten. Dankzij de 
gratis machinetaalmonitor, als programma-listing opgenomen, kunt u 
meteen met de vele voorbeelden experimenteren. Tegelijkertijd leert u 
spelenderwijs omgaan met de vele machinetaalinstructies die de 
MSX-computer kent. De vele overzichtelijke tabellen en tekeningen zult u 
steeds weer willen raadplegen. 


John Vanderaart geniet grote bekendheid als programmeur en als auteur 


van vele artikelen. In dit boek bewijst hij op een prettig leesbare manier dat 
iedereen in machinetaal kan leren programmeren. 
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